Disable/Password Protect Macro in Read-Only

[jaclynresendez]

Hello All,

I couldn't find an existing thread. Does anyone know if there is a way to either password protect or disable a macro (in this case a toggle button) if the spreadsheet is opened as read-only? I have the spreadsheet automatically open as read-only to users who do not have the password for modify access. There is one toggle button I do not want the user to be able to use if it is read-only. Is that possible?

 

[crimson_b1ade]

you could try a workbook open event (see below). The below code will be placed in the "ThisWorkbook" module:

Private Sub Workbook_Open()
 
    If ThisWorkbook.ReadOnly Then
     
        Sheets("Sheet1").ToggleButton1.Enabled = False
 
    End If

End Sub

 

[jaclynresendez]

Hello. I just got to a point where I absolutely need this to work. When I use it I get a Run Time Error. Any thoughts?

 

[crimson_b1ade]

make sure the sheet references in the code match the name of your sheet. Currently it is set to "Sheet1" so you'll have to change this if the name of your sheet the toggle button is on has a different name. Also, check the togglebutton name which, currently, the code is set to "ToggleButton1" which may or may not be the name of your toggle button. Finally, make sure this code is pasted in the "ThisWorkbook" module.