Gruppe
Format
Bereich
Automatik
Thema
Verhinderung der Formatumwandlung durch Excel
Problem
Wenn ich Zeichenfolgen ersetzen lassen, nimmt Excel manchmal eine automatische Datum-Formatierung vor. Kann das verhindert werden?
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain
Sub NoFormatting()
On Error GoTo ERRORHANDLER
ActiveSheet.TransitionFormEntry = True
Cells.Replace _
What:="20", _
Replacement:="19", _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
MatchCase:=False
ERRORHANDLER:
ActiveSheet.TransitionFormEntry = False
End Sub