At my home office this works fine, but in the office it is actually placing "F1" in the cell that is active. I generally despise using sendkeys, but this was the only solution that I came up with...
Thanks in advance for your help
Thanks in advance for your help
Code:
'---------------------------------------------------------------------------------------
' Procedure : NewSessionLastFile
' Author : XXXX
' Date : 11/8/2012
' Purpose : to open a new instance of Excel with the last opened file.
'---------------------------------------------------------------------------------------
'
Sub NewSessionLastFile()
'
On Error GoTo NewSessionLastFile_Error
Application.SendKeys ("%")
Application.SendKeys ("F")
Application.SendKeys ("1")
On Error GoTo 0
Exit Sub
NewSessionLastFile_Error:
MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure NewSessionLastFile of Module APStools"
End Sub