I'm stuck!
I'm running a VBA code to compare a local table with a ODBC table on my home computer.
Data no existing in my loacl will be added, so I compare both tables. Works great.
But now, because the connection goes through the internet and is sometimes a liitle slow I tried to design a
progress bar, by changing color after each section.
All txt boxes are chancing color only, after ALL query's are finished.
I tried to add an requery for the Text17 in this example, but again color change only after ALL 20 queries are complete.
I'm new in VBA and need a little bit help.
Thanks
.......
DoCmd.OpenQuery "Init_del_Customer", acViewNormal, acEdit (empty temp table)
DoCmd.OpenQuery "qry_Customer_down_select", acViewNormal, acEdit (compare both table with isNull and write ID into temp table)
DoCmd.OpenQuery "qry_Customer_download", acViewNormal, acEdit (adding new recordes from table A to table B by using ID in table temp)
Text17.BackColor = vbGreen (set color to green after section is complete, this is what is not working)
DoCmd.OpenQuery "Init_del_Customer", acViewNormal, acEdit
DoCmd.OpenQuery "qry_Customer_upload_select", acViewNormal, acEdit
DoCmd.OpenQuery "qry_Customer_upload", acViewNormal, acEdit
Text18.BackColor = vbGreen
.....
.....