Sub ()

folgender Code steht in d:\a.xls ...

Option Explicit
Dim a As String
Sub a_sub()
a = 5
Application.Run "d:\b.xls!b_Sub", a
End Sub

und folgender in d:\b.xls ...

Option Explicit
Dim b As String
Sub b_Sub(ByVal b As String)
MsgBox b
End Sub

Ich erhalte die Fehlermeldung, dass das Makro "d:\b.xls!b_Sub", a" nicht gefunden werden kann. Seltsam ist auch, dass im Dokument b unter EXTRAS/Makros/Makros das Makro b_Sub gar nicht auftaucht. Wenn ich den Teil in der Klammer weg nehmen dann steht b_Sub als Makro drin ... verstehe ich nicht ... ich muss doch irgendwie die Parameter an eine andere Prozedur übergeben können ...

Grüße

Nico