in my excel sheet, I have used the below code for two different macro function. But my both the code carrying private sub workbook open so its not working. any one can help me, please.
Private Sub Workbook_Open()
inp:
initials = InputBox("Enter Your Name")
If initials = vbNullString Then GoTo inp
Sheets("MAIN INPUT").Cells(3, 53).Value = initials
End Sub
Private Sub Workbook_Open()
Dim iLoop As Integer
'hide all sheets except first one.
For iLoop = 2 To Worksheets.Count
Worksheets(iLoop).Visible = False
Next
End Sub
Bookmarks