1
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)) …