Progress Indicator

[Panoos64]

Hi all, i prepared a VBA command by which i issue management accounts and it takes around 20-30 seconds when i run it. I would like to add a progress indicator in percentage into the above command, so that when i run it to appear this information on screen, e.g. Management Accounts in progress... I tried to create a user form in vba, but i couldn't managed it. I would be greatly appreciated any support. Thanks all in advance

 

[MickG]

Panoos65 , Hope you have managed to create a Userform !!!


Kelly
It's a long time since I've made a "progress Indicator" , never thought they where worth the Hassle !!, except for amusement.
You do need a counter in the code of some description, to relate the total count to the "Label" width, so that at the end of the count you are at the end of the Label width.

So if your Total counter (p), count is 5000 and the Max label width is 250 then 5000/250=20
Then you need to divide your counter by 20, as below

 p = p + 1
       Label1 .Width = p / 20

Hope that helps !!
Regrds Mick

 

[Panoos64]

Hi Mick, i overcome my issue. Just i am thinking where i should adapt the code and i am testing on it. I think i will find the solution, otherwise i will write again, asking for your support. Thanks you so much for your interesting to resolve my project. Hv a lovely day!!

 

[kelly mort]

Panoos65 , Hope you have managed to create a Userform !!!


Kelly
It's a long time since I've made a "progress Indicator" , never thought they where worth the Hassle !!, except for amusement.
You do need a counter in the code of some description, to relate the total count to the "Label" width, so that at the end of the count you are at the end of the Label width.

So if your Total counter (p), count is 5000 and the Max label width is 250 then 5000/250=20
Then you need to divide your counter by 20, as below

 p = p + 1
       Label1 .Width = p / 20

Hope that helps !!
Regrds Mick

Okay thanks. I will give it a try and challenge myself a bit.
Kelly