Hallo VBA-Experten,

ich verzeifle gerade an einem Problem und wende mich als letzten Ausweg an Euch:

In lasse in meiner Datei das Makro "CallSapRrp3" durch Doppelklick auf entweder Spalte A oder B _
mit der Funktion

<b>Application.Run ActiveWorkbook.Name & "!CallSapRrp3"</b>

durchlaufen (Select Case Methode). Wie ersichtlich, wird der Zielarbeitsmappenbezug durch ActiveWorkbook.Name dynamisch hergestellt. Der Code befindet sich unter "DieseArbeitsmappe".

Das Makro funktioniert in meiner "Rohdatei" tadellos. Nun das Problem: Wenn ich die Datei an jemanden per Email weiterschicke und dieser die Datei daraus öffnet und abspeichert ("Kopie von XXX"), dann erhalten diese bei Doppelklick den Fehler:

<b>"Laufzeitfehler 1004 - Makro kann nicht ausgeführt werden. Das Makro ist möglicherweise in dieser Arbeitsmappe nicht verfügbar, oder alle Makros wurden deaktiviert."</b>

Wie erwähnt, sind beide Dateien zu 100% identisch, bei der "Rohdatei" funktioniert es, bei der gespeicherten Kopie nicht.

Ich bin mit meinem Latein am Ende, kann mir hier jemand weiterhelfen?

Vielen Dank im Vorraus!

Daniel

Zur Vollständigkeit das gesamte Makro:

<b>Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel  _
As Boolean)
    
    Select Case Target.Column
        'Click A column
        Case 1

            Cells(Target.Row, 1).Select
                With Selection
                    .HorizontalAlignment = xlLeft
                End With
             Cancel = True

            Application.Run ActiveWorkbook.Name & "!CallSapRrp3"
            
       'Click B column
       Case 2

           Cells(Target.Row, 2).Select
                With Selection
                    .HorizontalAlignment = xlLeft
                End With
             Cancel = True

            Application.Run ActiveWorkbook.Name & "!CallSapRrp3", product, plant
            
    End Select

End Sub</b>