I want to make the below code to work globaly for all sheets .
I can manage to do it for just the activesheet but not globaly. When I press the macro button asks for password if correct unhide at all sheets column E if not stay hidden or hide it.
Can be also made super hidden? Cannot someone play with width etc
Sub pasw_inputbox() Dim mypassword Dim xAddress As String xAddress = "E:E" Application.ActiveSheet.Columns(xAddress).Hidden = True tryagain: mypassword = InputBox("Enter Password", "Password") If mypassword = "makis" Then Application.ActiveSheet.Columns(xAddress).Hidden = False MsgBox ("Correct") Else If MsgBox("Password incorrect, try again?", vbYesNo, "Wrong password") = vbYes Then GoTo tryagain Application.ActiveSheet.Columns(xAddress).Hidden = True End If End If End Sub