Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Automatische Datumformatierung unterdrücken

Gruppe

Automatik

Problem

Wenn ich in einem Bereich im Zahlenformat "Text" formatierter Zellen über das Menü BEARBEITEN / ERSETZEN die Kommata durch Punkte ersetze, wird ein Teil der Zahlen als Datum ("Apr 98") formatiert. Wie kann ich das verhindern?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub ReplaceComma()
   Dim rng As Range
   For Each rng In Range("A1:C2")
      If InStr(rng.Value, ",") <> 0 Then
         rng.Value = Application.Substitute(rng, ",", ".")
      End If
   Next rng
End Sub