Hi All,
I am trying to find a way to open every new workbook at cell A4, I have found the code below but It only works for the saved workbook it is in, any Ideas
Private Sub Workbook_SheetActivate(ByVal Wsh As Object)
On Error Resume Next
Wsh.Range("A4").Select
End Sub
Thanks in advance for any help
Roman
I am trying to find a way to open every new workbook at cell A4, I have found the code below but It only works for the saved workbook it is in, any Ideas
Private Sub Workbook_SheetActivate(ByVal Wsh As Object)
On Error Resume Next
Wsh.Range("A4").Select
End Sub
Thanks in advance for any help
Roman