Making commandbutton11.visible = false when the book opens as read only

[0 Agios]

in a vba form i need the saving command button to be invisible when the book opens as read only, i tried a number of things but they don't work, please help.

here is what i am trying to use but it don't work

If WB.ReadOnly = True Then
CommandButton11.Visible = False
Exit Sub
End If

 

[HaHoBe]

Hi Agios,

where did you put the code?

Private Sub UserForm_Initialize()
If ThisWorkbook.ReadOnly = True Then
  CommandButton11.Visible = False
  Exit Sub
End If
End Sub

Code behind the UserForm works for me.

Ciao,
Holger

 

[rhombus4]

Shouldn't it be in the workbook open event

 

[HaHoBe]

Hi rhombus4,

maybe I misunderstand in a vba form when thinking of a Userform but for that case I´d stick with the event mentioned (I rarely change the status of a workbook so that would be the best place to put that command for me).

And if it should be in the Workbook_Open there should be a classification as sheetname or name of userform in order to get it to work (although I doubt it to work if the userform isn´t loaded by then).

Ciao,
Holger