Job Progress Status Bar

gsrajan

Registered User.
Local time
Yesterday, 19:33
Joined
Apr 22, 2014
Messages
227
I have a form with 4 stages of activities. Is it possible to have a Status bar in Access?. For example, if the first stage is reached, a part of the the status bar get a specified color and so on. When the last activity is completed, the whole status bar gets the same color. It is like FedEx tracking page activities.

Thank you
 
You could put 4 textboxes next to each other and change the back color of each, either with Conditional Formatting or VBA code.
 
yes. create two line or box controls, PBar1 and PBar2.

Make both the same width with PBar1 taller than PBar2 which should be centred over box2 and a different colour

Assuming you have 4 steps then in vba (probably the form current event) adjust the PBar2 width to

Code:
PBar2.Width=PBar1.width\4*NoOfStepsCompleted
You have not provided any information on how you get the number of steps but the above should get you going
 
Thank you,

I have four text boxes. txtDocReceived, txtDocReviewed, txtDocPrepared and txtDocSubmitted. If the len(txtDocReceived)>0 then the the txtProgressBar1 changes the color from red to green. It goes like this for other text boxes (txtDocReviewed, txtDocPrepared and txtDocSubmitted) also.

Please let me know VBA for this, and also I understood from you that I need to place the code, not in command (save ) button click event, but in the form current.

Thank you
 
Not sure which solution you are going for but for mine, in your form current event put

PBar2.length=PBar1.length\4*abs(len(nz(txtDocReceived))>0+len(nz(txtDocReviewed))>0+len(nz(txtDocPrepared))>0+len(nz(txtDocSubmitted)))>0)

If you are looking at the other solution, you would use conditional formatting
 
Thank you, I tried this and got syntax error. I wasn't sure what is wrong. I added labels with vbred color and added a select statement with vbgreen green in the form current event. It works fine. Thanks again.
 

Users who are viewing this thread

Back
Top Bottom