VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Umwandlung von Komma in Punkt

Gruppe

Ereignis

Bereich

Change

Thema

Umwandlung von Komma in Punkt

Problem

Bei Eingaben mit Kommata in Spalte A wird das Komma automatisch in einen Punkt umgewandelt.

Lösung

Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.




ClassModule: Tabelle1

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column <> 1 Then Exit Sub
   If IsEmpty(Target) Then Exit Sub
   On Error GoTo ERRORHANDLER
   Application.EnableEvents = False
   If InStr(Target.Value, ",") Then
      Target.NumberFormat = "@"
      Target.Value = Application.Substitute(Target.Text, ",", ".")
   End If
ERRORHANDLER:
   Application.EnableEvents = True
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Ereignis und Change