Hi everybody,
I have an activeX button on sheet "Tab". I have the following code to hide this button unless the username is ron2k_1 or cmain:
But it tells me that it cannot support that method. How should I do it guys?Private Sub Workbook_Open() With ThisWorkbook.Sheets("Tab").CommandButton1 Select Case Environ$("USERNAME") Case "ron2k_1", "cmain" .Shapes.CommandButton1.Visible = True Case Else .Shapes.CommandButton1.Visible = False End Select End With End Sub
Thanks,
Bookmarks