Thanks for replying.

After trying to run the code, I first get a window saying: "Compile
error: Can't find project or library". Note that this worked fine in
the previous version of Excel (which I have at home, but cannot use at
work).

I must admit here that I am far from proficient in VB. I next hit the
Toggle to see which statement is failing, and this is what is
highlighted:

If UCase(TextBox1.Value) = "ADMIN" Then

within this group...

Public Sub OKButton_Click()
Dim NoGood As Boolean
NoGood = True
CheckUser.Hide
If UCase(TextBox1.Value) = "ADMIN" Then
Application.Goto Reference:="Logname"
ActiveCell.FormulaR1C1 = "ADMIN"
Application.Goto Reference:="ULFile1"
ActiveCell.FormulaR1C1 = "C:\FHC Simulation\FHC Admin File
2.xls"
Application.Goto Reference:="ULFile2"
ActiveCell.FormulaR1C1 = "C:\FHC Simulation\FHC Admin File
3.xls"
NoGood = False
End If

...all file locations have been verified, etc.

Does this help?



*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!