Hallo,

leider weiß ich nicht, ob es zu dem Thema schon Beiträge gibt, da ich die "Suchen"-Funktion nicht aktivieren kann.

Ich möchte ein Makro in einem Workbook aus einem anderen Makro aufrufen:
Workbook Test:  Sub AufrufenInAnderemWorkbook() in einem Sheet-Makro, manuell gestartet:

Sub AufrufenInAnderemWorkbook()
    ' Öffne "Workbook Test1"
    Dim wbTest1 As Workbook
    On Error Resume Next
    Set wbTest1 = Workbooks("Test1.xlsm")
    On Error GoTo 0
    
    ' Wenn "Workbook Test1" bereits geöffnet ist, rufe "Test2" auf
    If Not wbTest1 Is Nothing Then
        wbTest1.Application.Run "Test2"
    Else
        MsgBox "Workbook Test1 ist nicht geöffnet."
    End If
End Sub

> Workbook Test1 min dem Makro in "Diese Arbeitsmappe":

Public Sub Test2()
    MsgBox "FUNKTIONIERT"
End Sub

Laufzeitfehler 1004 - Das Makro kann nicht ausgeführt werden

Befehl: wbTest1.Application.Run "Test2"

Was ist da falsch?

Danke für eure Hilfe

Andi