Kapitel 11 So können Sie auf Eingaben in Zellen und Bereichen reagieren Listing 11.8: Eine einzelne Spalte überwachen Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 1 Then Exit Sub MsgBox "Änderung in Spalte " & Target.Column End Sub 11.9 So führen Sie automatische Konvertierungsarbeiten durch Eine Überwachung auf Änderungen in einer oder mehreren Spalten kann dann sinnvoll sein, wenn Eingaben von Anwendern beispielsweise automatisch in ein bestimmtes Format gebracht werden sollen. Im folgenden Beispiel werden in T ABELLE 9 in der Spalte C alle Eingaben automatisch in Großschreibweise umge- wandelt. Listing 11.9: Automatische Konvertierung von Eingaben Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 3 Then Exit Sub Target.Value = UCase(Target.Value) End Sub