Gruppe
Ereignis
Bereich
Change
Thema
Umwandlung einer Zeichenfolge in Spalte A in Großbuchstaben
Problem
Alle Eingaben in Spalte A sollen in Großbuchstaben umgewandelt werden.
Lösung
Geben Sie den nachfolgenden Code in das Klassenmodul der UsereForm ein.
ClassModule: Tabelle1
Private Sub Worksheet_Change(ByVal Target As Range)
If IsEmpty(Target) Then Exit Sub
If Target.Cells.Count > 1 Then Exit Sub
If Target.Column > 1 Then Exit Sub
Application.EnableEvents = False
Target.Value = UCase(Target.Value)
Application.EnableEvents = True
End Sub