Debug?

[Funkymatt]

What's wrong with this...it's too simple?

Sub InsertDate()
If Worksheets("NothernTrust&quot.Cells(1, 1).Value = Date Then
'Note that A =1, B =2, C=3, D=4, E=5, F=6, G=7 Sheet1.Cells(Row#, Column#)

MsgBox "No action has been taken. This worksheet has alredy been modified today."
'Do nothing, it had already been edited

Else
'Date not accurate, select the column to move then shift it to the right

Worksheets("NothernTrust&quot.Cells(1, 1).Value = Date
End If
End Sub

 

[DrJavaJoe]

I couldn't see anything wrong so I tested it only changing NothernTrust to sheet1 and it worked. What's it doing?

 

[Funkymatt]

Funny....so I changed the name of my sheet from NorthernTrust to Sheet1 and now it works....

Prior to the change it was giving me an "Out Of Range" error..