I have been able to Step through the macro and it works. But when I click on
the button to activate the macro, nothing happens. I have made sure I am not
in Design Mode when clicking.

"LDanix" wrote:

I have put in the code exactly like I see it. Are there any special
characters that I should be using anywhere? I can't seem to get it to work.
I'm new to programming in VB.

"Don Guillett" wrote:

something like this?
Sub unhide()
Sheets(InputBox("enter num")).Visible = True
End Sub
OR
Sub unhidea()
x = InputBox("your num")
Sheets(x).Visible = True
Application.Goto Sheets(x).Range("a1")
End Sub
--
Don Guillett
SalesAid Software

"JulieD" wrote in message
...
Hi Luke

have a button on the front sheet called "click me" (or similar) with the
following code behind it

sub clickme()
dim eID as string

on error goto err_handle
eID=Inputbox("Please, enter your employee ID number","Log In")

Sheets(eID).visible = true
Sheets(eID).activate

exit sub

err_handle:
msgbox "Invalid number, please try again",vbCritical,"Wrong"

end sub

"LDanix" wrote in message
...
I have 12 agents that I manage. I want to create a workbook that includes
each person's vacation accrued and spent on separate worksheets.

I want to make all the worksheets invisible upon load of the workbook (I
figured that out). I want to give each agent access to their own
worksheet
without being able to view the other agents.

I have each worksheet named as the agents' employee ID numbers. I want
to
create a macro that will make visible a worksheet based on the employee
ID
number an agent types in somewhere.

Thanks,
Luke