Makro aus einem ADD in Aufrufen

Public Sub TestInDokument()
MsgBox "Test erfolgreich"
End Sub


Public Sub StartAddInMethode()
'Diese Methode wird zum Starten der Testmethode im Add-In aufgerufen.
Dim sFuncName As String
sFuncName = "DataBridge.dot!.perform"
'sFuncName = "DataBridge.dot!Modul1.perform"
Application.Run sFuncName
End Sub




Public Sub StartMethodeHierImDokument()
'Diese Methode wird zum Starten der Testmethode hier in diesem Dokument aufgerufen.
Dim sFuncName As String
Dim sFile As String
Dim Name As String
sFile = ActiveDocument.Name
Name = "TestInDokument"
Application.Run "MyAddIns.dot!Modul1.TestInDokument"
End Sub


Und im Add In was ich erstellt habe steht als Code

Option Explicit

Public Function perform() As Boolean

Dim sFile, Name As String

Dim sFuncName As String

Dim wkb As Document

sFile = ActiveDocument.Name

Name = "Test"

On Error Resume Next

Set wkb = Documents(sFile)

On Error GoTo fehler

If wkb Is Nothing Then

MsgBox "Die Arbeitsmappe " & sFile & " wurde nicht gefunden!"

Else

sFuncName = "'" & sFile & "'!Modul1" & Name

Application.Run sFuncName

'"MyAddIns.dot!Modul1.Test"

End If

perform = True

Exit Function

fehler:

MsgBox "Fehler"

End Function

Public Sub TestInADDIN()

MsgBox " Add IN erfolgreich"

End Sub

[/code]

Nun möchte ich aus meinem ADDIN ein MAkro vom Normalen Word Dokunet aufrufen, wie geht das?

Tausen Dank