Hello. Office 2003.
I'm trying to use the RunApp macro to open an Excel spreadsheet, with the command line:
"C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE" "C:\Documents and Settings\student2\My
Documents\"&[txtFileName]&format(date()," dd mmm yyyy")&".XLS"
I've tried several different versions (with and without .xls etc.) but can't get it to open the file. I suspect
that reading part of the file name from a text box is causing the problem.
Any suggestion? Thanks, Andy.
RunApp to open file
-
- SilverLounger
- Posts: 2403
- Joined: 05 Feb 2010, 22:21
- Location: London ENGLAND
RunApp to open file
"I'm here to save your life. But if I'm going to do that, I'll need total uninanonynymity." Me Myself & Irene.
-
- Administrator
- Posts: 78631
- Joined: 16 Jan 2010, 00:14
- Status: Microsoft MVP
- Location: Wageningen, The Netherlands
Re: RunApp to open file
RunApp doesn't play nice with concatenated strings. Here is a method to get around it.
Create a new module in the Visual Basic Editor (Insert | Module)
Copy the following code into the module:
Create the following On Click event procedure for the button (or whatever) that should open the workbook:
If you'd like Excel to be opened in a maximized window, change SW_SHOWNORMAL to SW_SHOWMAXIMIZED.
Create a new module in the Visual Basic Editor (Insert | Module)
Copy the following code into the module:
Code: Select all
Public Declare Function ShellExecute _
Lib "shell32.dll" Alias "ShellExecuteA" ( _
ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Public Const SW_SHOWNORMAL = 1
Public Const SW_SHOWMAXIMIZED = 3
Code: Select all
Private Sub cmdOpenWorkbook_Click()
ShellExecute Application.hWndAccessApp, "Open", _
"C:\Documents and Settings\student2\My Documents\" & _
Me.txtFileName & Format(Date," dd mmm yyyy") & ".xls", _
0&, 0&, SW_SHOWNORMAL
End Sub
Best wishes,
Hans
Hans
-
- SilverLounger
- Posts: 2403
- Joined: 05 Feb 2010, 22:21
- Location: London ENGLAND
Re: RunApp to open file
Hello.
That's good, although a shame that I can't do this with a simple macro. Thanks, Andy.
That's good, although a shame that I can't do this with a simple macro. Thanks, Andy.
"I'm here to save your life. But if I'm going to do that, I'll need total uninanonynymity." Me Myself & Irene.