We have numerous macros in personal.xlsb for years with shortcut keys. Recently shortcut Ctrl+Shift+Z , that protects each sheet in a workbook, quit working for some users.
The macro runs fine when run sub/userform from VBA. With it working for some users, was thinking it was might have been an update but can find no reference to it on the internet. Removed the lastest update and that didn't make a difference.
We have tried renaming the macro and creating a new module which didn't work. We can assign another shortcut key and that works.
While that seems like the easy answer, we have limited shortcut keys available due to the numerous macros being used.
Has anyone else run into this?
Code copied from the internet:
Sub ProtectSheets()
'
' ProtectSheets Macro
'
' Keyboard Shortcut: Ctrl+Shift+Z
'Sub Protect_sheets()
Dim wSheet As Worksheet
Dim Pwd As String
Pwd = InputBox("Enter your password to protect all worksheets", "Password Input")
For Each wSheet In Worksheets
wSheet.Protect Password:=""
Next wSheet
End Sub
The macro runs fine when run sub/userform from VBA. With it working for some users, was thinking it was might have been an update but can find no reference to it on the internet. Removed the lastest update and that didn't make a difference.
We have tried renaming the macro and creating a new module which didn't work. We can assign another shortcut key and that works.
While that seems like the easy answer, we have limited shortcut keys available due to the numerous macros being used.
Has anyone else run into this?
Code copied from the internet:
Sub ProtectSheets()
'
' ProtectSheets Macro
'
' Keyboard Shortcut: Ctrl+Shift+Z
'Sub Protect_sheets()
Dim wSheet As Worksheet
Dim Pwd As String
Pwd = InputBox("Enter your password to protect all worksheets", "Password Input")
For Each wSheet In Worksheets
wSheet.Protect Password:=""
Next wSheet
End Sub
