excel - import excell data into ms access tables -
ihave excell sheeet wich generate programme
i want import sheet ms access programme.how data related table filtering data.
|deptno|deptname| =>(dept table)
|staffno|staffname| =>(staff table)
|deptno|staffno|workdate|week| =>(attendance table)
you might write program outlined --
revised on 3/25 late dim weareinworkdates string each row in worksheet if cola.value = dept row weareinworkdates = "no" 'reset flag false values if these values don't exist in depttable insert new row depttable endif elseif cola.value = staff row weareinworkdates = "no" 'reset flag false values if these values don't exist in stafftable insert new row stafftable endif elseif cola.value = "workdate" bypass row weareinworkdates = "yes" ' set flag elseif cola.value = "summary" bypass row weareinworkdates = "no" 'reset flag false elseif cola.value = blanks bypass row elseif weareinworkdates = "yes" 'get values row local variables dim xxx xxx = myxls.cells(nrow,ncol) ... etc ' prevent double posting of xls mdb tables 'if these values don't exist in attendancetable set rst = db(select * attendancetable atkey = xxx(i.e. mylocalvars)) if rst.bof , rst.eof ' rst empty, ergo not yet posted insert row in attendancetable endif else display have unknown row endif
Comments
Post a Comment