Does any one has the code on how to incorporate excel progress bar as the code below is running? Please help. Thank you.
Code:
Sub SaveAll()
Dim strValRange As String
Dim rngVal As Range
Dim rngDep As Range
Application.ScreenUpdating = False
strValRange = Range("A3").Validation.Formula1
Set rngVal = Range(strValRange)
For Each rngDep In rngVal.Cells
Range("A3").Value = rngDep.Value
Call SavePDF
Next
Application.ScreenUpdating = True
End Sub