Fehler: Das Makro ist in dieser Arbeitsmappe möglicherweise nicht verfügbar oder alle Makros sind möglicherweise deaktiviert

Ich versuche, die Lösung aus diesem Beitrag zu übernehmen und habe das Makro leicht modifiziert (ich muss nur einen Klick auf die Schaltfläche hinzufügen), damit es jetzt ist

Sub AdjustValue()
    Dim btnName As String
    Dim targetCell As String
    Dim addAmount As Integer

    btnName = Application.Caller
    targetCell = Mid(btnName, 5, Len(btnName))
    addAmount = 1

    ActiveSheet.Range(targetCell).Value = ActiveSheet.Range(targetCell).Value + addAmount
End Sub

Wenn ich auf die Schaltfläche "Add_B3" klicke, wird ein Fehler verursacht

Das Makro ist in dieser Arbeitsmappe möglicherweise nicht verfügbar oder alle Makros sind möglicherweise deaktiviert

Ich habe das Makro sowohl auf dem Blatt gespeichert, in dem ich arbeite, als auch auf ThisWorkbook.

Ich habe meine Makroeinstellungen im Vertrauensstellungscenter auf "Alle Makros mit Benachrichtigung deaktivieren" gesetzt, aber selbst wenn ich "Alle Makros aktivieren" auswähle, ist der Fehler weiterhin aufgetreten, und ich kann nicht herausfinden, warum.

— Alex S
quelle

Versuchen Sie, die Schaltfläche dem Makro neu zuzuweisen.

— bdr9

@ bdr9 danke, das wars. Ich musste nur mit der rechten Maustaste auf die Schaltfläche> Makro zuweisen> doppelklicken Sie auf den Makronamen. Gibt es irgendwo, wo ich hätte überprüfen können, ob das Makro der Schaltfläche zugewiesen wurde?

— Alex S

Wenn Sie zum ersten Mal mit der rechten Maustaste auf die Schaltfläche klicken und "Makro zuweisen" wählen, sollte im Textfeld "Makroname" angezeigt werden, welches Makro der Schaltfläche derzeit zugewiesen ist.

— bdr9

Es sieht so aus, als ob die Zuordnung der Schaltfläche zum Makro aufgehoben wurde. Versuchen Sie, die Schaltfläche dem Makro neu zuzuweisen.

— bdr9
quelle