PDA

Vollständige Version anzeigen : Word-File über Menü aufrufen


babsi
22.12.2000, 13:57
Hallo !

Ich hätte eine kleine Frage...und zwar möchte ich in einem Menü den Punkt "Berichte" integrieren (hab ich schon ;o) ). Als Unterpunkt sollte der Punkt
"Anmeldungsbestätigung" zur Verfügung stehen. Wenn dieser Punkt betätigt wird soll ein Wordfile geöffnet werden.

Danke schon im vorraus !

Babsi

Vitjok
22.12.2000, 17:29
Sreib einfach eine Funktion (Modul), die dein Word-File oeffnet. Die kann z.B. so aussehen:
Public Sub OpenWordDoc(strDocuPath As String)
Dim appWd As Word.Application

On Error Resume Next
Set appWd = GetObject(, "Word.Application.8")
If Err.Number <> 0 Then
Err.Clear ' Clear Err object in case error occurred.
'Create a new instance of Word
Set appWd = CreateObject("Word.Application.8")
'Create an instance of Word
End If

appWd.WindowState = wdWindowStateMaximize
appWd.Documents.Open (strDocuPath)
appWd.Visible = True

End Sub


Tue diese Funktion in ein Makro rein, z.B.:

Makro mcrStartMyWordDoc
als Action RunCode auswaehlen,
als Function Name OpenWordDoc("C:\MyDir\MyDoc.doc") einstellen


Dieses Makro kannst du dann ueber deinen Menueintrag ("Anmeldebestaetigung") aufrufen: wenn du mit rechter Maustaste auf deinen Unterpunkt "Anmeldebestaetigung" clickst (im Menue-Bearbeitungs-Tool von Access), kannst du dann unter Properties(Eigenschaften) bei On Action mcrStartMyWordDoc angeben.

So, ich galub' das war's.