title image


Smiley Re: Öffnen von Excel doku. via Shell in Access ???
Hallo Fritz,Mit Shellexecute wird die Basianwendung (mit)gestartet.Nach Option Compare Database (und oder)Option Explicit in einem Formularmodul:Private 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 LongFunction StartDoc(ByVal DocName As String)Const SW_SHOWNORMAL = 1On Error GoTo StartDoc_ErrorStartDoc = Shellexecute(Application.hWndAccessApp, "Open", DocName, _"", Left(DocName, 3), SW_SHOWNORMAL)Exit FunctionStartDoc_Error:MsgBox Err.Description & ", " & Err.NumberExit FunctionEnd FunctionAufruf z.B.:Startdoc("N:\Pfad\ExcelDatei.xls")Walter

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: