ich möchte euch bitten mir bei folgender Fragestellung zu helfen:
Diesen Code zum stetigen Einfügen mit an die Zielformatierung angepasster Formatierung möchte ich gern für alle Arbeitsmappen zur Verfügung stehen haben:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Werte
Application.EnableEvents = False
Application.ScreenUpdating = False
Werte = Target.Value
Application.Undo
Target.Value = Werte
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub
(Quelle: https://www.herber.de/cgi-bin/callthread.pl?index=1663148)
Nun habe ich versucht diesen in die PERSONAL.XLSB einzufügen: https://www.herber.de/bbs/user/137020.xlsb
Leider klappt dies jedoch nicht. Kann mir jemand helfen?
Vielen Dank und frohe Grüße