ich benötige für eine Scanliste mit zwei Spalten das Beschneiden auf eine Anzahl von 10 Zeichen. _
Da es sich um ZWEI Spalten handelt und ich das versuche, mit VBA zu lösen, hier mein Problem. _
nach meiner Meinung müßte ich dies so lösen können:
If Target.Row > 1 Then
If Target.Column = 3 And Target.Column = 8 Then
If Target.Cells.Count = 1 Then
Application.EnableEvents = False
Target.Value = Left(Trim(Target.Text), 10)
Application.EnableEvents = True
End If
End If
End If
Läuft aber nicht...
Mit
If Target.Column = 3 Then
ElseIf Target.Column = 8 Then
Geht's auch nicht, bzw. es wird nur für die Spalte 8 (die ElseIf-Funktion) ausgeführt.
Wo hab ich hier meinen Denkfehler...?
Schon mal vielen Dank - Boory