Hello everyone,
I hope all is well with you and that you're keeping safe!
I have a couple of problems in displaying progress on the statusbar.
There's a lot on the net about this. I've used displaying text and then a number of bars inside of [ ] showing percentage done.
So....
"Working on P:\Lisa\GetProcs\File Name.xlsm [|||||||| ] 70/140 50%"
1) Using a proportional font.
Even when I try to pad the statusbar text out the displayed result still shrinks and expands depending on what the text is in front of the [|||| ] display. THis makes the display very difficult to read sometimes.
2) Making the status bar stand out a little more.
The bar and text is in the system colours and I feel it could do with being a bit more "noticeable".
To this end I'm looking to....
1) Position items in the string accurately or placement on the status bar. Chaning to a non proportional font may help as well.
2) Change the font colour of the statusbar and possibly the background colour.
I'm reasonably okay with API calls, which I'm assuming I'm going to have to use.
Any help greatly appreciated.
TIA
Lisa
StatusBar properties
-
- Administrator
- Posts: 78535
- Joined: 16 Jan 2010, 00:14
- Status: Microsoft MVP
- Location: Wageningen, The Netherlands
Re: StatusBar properties
It'd be complicated. Why not use a (possibly modeless) userform with a label as progress bar? See Beautiful VBA Progress Bar with Step by Step Instructions
Best wishes,
Hans
Hans
-
- 5StarLounger
- Posts: 964
- Joined: 08 Nov 2012, 17:54
Re: StatusBar properties
Actually I suggested that and the user doesn't want anything hiding the window. In some ways I sympathise because for a long process with screen upating = true you can see what's going on. It's the same sort of thing as installing lights in equipment for people to look at even though they don't mean anything I guess.
Lisa
Lisa
-
- StarLounger
- Posts: 92
- Joined: 10 Oct 2022, 02:52
Re: StatusBar properties
Dear All,
I use a macro to send the email and code to monitor the progress. Please explain to me whether it is possible to increase the font size of the status bar when the macro is running.
Application.DisplayStatusBar = True
Application.StatusBar = "Progress: " & "PF No. : " & ws6.Cells(j, 2).Value & " " & j - 3 & " of " & last_row - 3 & " : " & Format((j - 3) / (last_row - 3), "0%")
Application.StatusBar = False
Application.ScreenUpdating = True
Regarding,
Priyantha
I use a macro to send the email and code to monitor the progress. Please explain to me whether it is possible to increase the font size of the status bar when the macro is running.
Application.DisplayStatusBar = True
Application.StatusBar = "Progress: " & "PF No. : " & ws6.Cells(j, 2).Value & " " & j - 3 & " of " & last_row - 3 & " : " & Format((j - 3) / (last_row - 3), "0%")
Application.StatusBar = False
Application.ScreenUpdating = True
Regarding,
Priyantha
-
- Administrator
- Posts: 78535
- Joined: 16 Jan 2010, 00:14
- Status: Microsoft MVP
- Location: Wageningen, The Netherlands
Re: StatusBar properties
No, it is not possible to change the font size of the status bar in Excel.
Best wishes,
Hans
Hans
-
- StarLounger
- Posts: 92
- Joined: 10 Oct 2022, 02:52
Re: StatusBar properties
Thanks
Regarding
Priyantha
Regarding
Priyantha