Zelle verlassen = Leerzeichen entfernen
{mskro}
wer kann mir mal wieder etwas weiter helfen.
Mit folgender Sub öffne ich ein Fenster, wenn ich den Zelleninhalt der Zelle A1 geändert habe.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
MsgBox "Die Zelle wurde verändert"
End If
End Sub
Gesucht wird eine Funktion, die beim Verlassen einer Zelle durch eventuelle Fehleingaben von nur Leerzeichen, diese wieder entfernt oder bei vorhanden alten Eingaben, diese dann korrigiert.
Vielleicht hat ja jemand eine Lösung für mich.
Gruß Manfred
PS: VBA gut heißt in diesem Fall noch nicht gut genug. :-)
Anzeige