P
Phil Hageman
Chip, Thanks - it works! Can I ask you this - I have an
Auto_Open Sub (below). Can this be modified to
automatically switch the user's security to Medium when
they open this workbook, then reset it to high on close?
Sub Auto_Open()
Application.ScreenUpdating = False
For Each ws In Worksheets
If ws.Visible = xlSheetVisible Then
ws.Select
Application.GoTo ws.Range("A1"), True
ActiveWindow.DisplayGridlines = False
End If
Next
Worksheets("Scorecard").Select
Application.AutoPercentEntry = True
Application.ScreenUpdating = True
End Sub
Thanks, Phil
Auto_Open Sub (below). Can this be modified to
automatically switch the user's security to Medium when
they open this workbook, then reset it to high on close?
Sub Auto_Open()
Application.ScreenUpdating = False
For Each ws In Worksheets
If ws.Visible = xlSheetVisible Then
ws.Select
Application.GoTo ws.Range("A1"), True
ActiveWindow.DisplayGridlines = False
End If
Next
Worksheets("Scorecard").Select
Application.AutoPercentEntry = True
Application.ScreenUpdating = True
End Sub
Thanks, Phil