As an alternate to an InputBox you could use Application.UserName, but you
need to make sure that the individuals have entered thier user name in the
Excel
Tools:Options:General area.

Private Sub Workbook_Open()
If Sheets("SheetName").range("A1") = Empty then
Sheets("SheetName").range=("A1")=Application.UserN ame
Sheets("SheetName").range=("B1")=Date
End if

End Sub


"Shane Devenshire" wrote:

You will need a VBA macro here is a quick sample:

Here is some sample code for the Workbook_Open procedu

Private Sub Workbook_Open()
myInfo = InputBox("Enter your ID")
If myInfo < "" Then
'your code
End If
End Sub

This code goes into the thisWorkbook object in the VBE. Press Alt+F11,
double-click the thisWorkbook object, for your workbook, in the Project
explorer near the top left of the screen.


--
If this helps, please click the Yes button

Cheers,
Shane Devenshire


"ArcticWolf" wrote:

Hi,

When the user opens the file for the first time - I need Excel to input the
User name of the PC in A1, and in B1 I need to put todays date. When I open
the file tomorrow I still need it to show "yesterdays" date - so is there
away I can keep it static?

Thanks in advance,

AW