hi
i am working on setting up the ability to refresh PQ on a protected sheet
this is my code:
it maybe does the refresh because i keep getting this message:
the cells you are trying to change is on a protected sheet
i am working on setting up the ability to refresh PQ on a protected sheet
this is my code:
VBA Code:
Sub RefreshPQActiveWorkbook()
Dim ActSheet As String
ActSheet = ActiveSheet.Name
Workbooks("SD Reimbursements").Activate
If MsgBox("Do you want to refresh?", vbOKCancel + vbQuestion) = vbOK Then
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
Call WSUnProtect(ws)
Next ws
DoEvents
ActiveWorkbook.RefreshAll
For Each ws In ActiveWorkbook.Worksheets
Call WSProtect(ws)
Next ws
it maybe does the refresh because i keep getting this message:
the cells you are trying to change is on a protected sheet