Hier eine API zum Öffnen von Word, wo Du nun welche befehler für Word brauchst wissen wir leider nicht, Du müsstest schonmal genauer sagen was Du willst.

Gruß Marie

Private Declare Function GetDesktopWindow Lib "user32" () As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
                                    (ByVal lpClassName As String, ByVal _
                                    lpWindowName As String) As Long
                                    
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long

Private Declare Function SetActiveWindow Lib "user32" (ByVal hwnd As Long) As Long

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 Long
Public Function OpenWordForeground(cWordDoc As String)

'Worddokument in den Vordergrund holen wenn bereits geöffnet oder im Vordergrund öffnen

On Error GoTo Err_OpenWordDoc

    Dim HwndDeskTop
    Dim HwndWord As Long
    Dim Ret As Long

    HwndWord = FindWindow("OpusApp", vbNullString)
    If HwndWord <> 0 Then
        SetForegroundWindow HwndWord
        SetActiveWindow HwndWord
    Else
        HwndDeskTop = GetDesktopWindow
    End If
    Ret = ShellExecute(HwndDeskTop, "Open", cWordDoc, 0&, 0&, SW_SHOWMAXIMIZED)

Exit_OpenWordDoc:
    Exit Function

Err_OpenWordDoc:
    MsgBox "Fehlernummer: " & Err.Number & vbCrLf & _
            "Fehlerbeschreibung: " & Err.Description, _
            vbCritical, "Fehler in Public Function OpenWordDoc"
    Resume Exit_OpenWordDoc
End Function

Hallo Marie,

sorry für die späte Rückmeldung. Habe keine Zeit gehabt mich einzuloggen.

Ich möchte die Befehle nach dem öffnen von Word einfügen. Die Befehle würde ich dann in Word aufzeichnen und entsprechend einfügen. Noch kann ich keine genauen Befehle nennen da ich noch am überlegen bin.

Gruß
afetinci

Na ja, dann benutze doch den Code oben zum Öffnen von Word

Gruß Marie