+91 9176633248

Courses

How to Show Progress on Status Bar using VBA?

 

The below code will add serial numbers up to 500 in your sheet and along with it will show progress on the status bar.

 

Sub progressStatusBar()

Application.StatusBar= "Start Printing the Numbers"

For icntr= 1 To 500

Cells(icntr, 1) = icntr

Application.StatusBar= " Please wait while printing the numbers " ; Round((icntr/ 500 * 100), 0) ; "%"

Next

Application.StatusBar= ""

End Sub

 

Explore extensive VBA Automation Course here, to automate your routine Excel Reports, Processes and Tasks using Microsoft Excel VB Programming.

 

Happy Excelling
Team Excelgoodies

VBA & Python

New

Next Batches Now Live

Power BIPower BI
Power BISQL
Power BIPower Apps
Power BIPower Automate
Power BIMicrosoft Fabrics
Power BIAzure Data Engineering
Explore Dates & Reserve Your Spot Reserve Your Spot