Excelgoodies
+1 650 491 3131
Excelgoodies logo +1 650 491 3131
+1 650 491 3131  

 Business Professionals

 Techno-Business Professionals

 Technology Professionals

Home

|

About Us

|

Contact Us

Programs & Courses

New

Home | About Us | Contact Us

+1 650 491 3131

inquiry@excelgoodies.com

ExcelGoodies WorldwideUSA | UK | Australia | Singapore | Phillipinnes

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 →

Related Articles