Userform frame progress bar for userform completion

[ABSTRAKTUS]

Hi all,

Such a simple(!) approach, but can't get my head round it.

I have a multipage userform with bunch of objects (textboxes, comboboxes etc). User will have to fill in all mandatory fields. I have also got a Frame progress bar on that userform and would like it to indicate userform completion progress as user fills in the values.

I found this code that activates and runs progress bar, but I want it to only look at one cell, say A1, which will hold a number of already filled in fields. How do I adapt the below code to look at A1?

Please Login or Register  to view this content.

Thanks all!

[kasan]

Hi,
In case you have some cell that contains number of filled objects AND you know Total count of object to be filled - I think you can run just Sub progress.

Please Login or Register  to view this content.

[ABSTRAKTUS]

Yes, I do have those numbers. Where do I put this code mate?

[kasan]

Interesting question Your first question sound like you know that to do with it.
Any chance you could upload file with userform? No data needed, just to see how you collect number of filled controls.

[ABSTRAKTUS]

I have not yet written the code to return a number of filled controls in A1, just assumed the result would be in A1.

[kasan]

Hm, one way to to this would be recalculate total count of filled controls each time any of them are changed (using _Change invents). And after each recalculation - call progress bar sub.

[ABSTRAKTUS]

I think I got it running now. The only dilemma now is to get the number of filled in controls...

See attached.

[kasan]

You could use your ExitFormat routine. As I understood - if Textbox or combobox is filled - color is changed, right?
So after each ExitFormat you can count how many controls is with specific color.
1) Added global variable

Please Login or Register  to view this content.

2) New Sub to count painted controls

Please Login or Register  to view this content.

3) Add red lines in our ExitFormat sub

Please Login or Register  to view this content.