irgendwie bekomme ich es nicht hin.
Ich möchte den Text einer Zelle ab 3 Zeichen löschen.
Beispiel:
Kurt k = kur soll bleiben
Bitte als Formel und für ein Makro,
danke im Voraus
gruß kurt k
Sub Kurz()
Dim C As Range
For Each C In Selection
C = Mid$(C, 1, 3)
Next
End Sub
Sub Kurz_A1()
Range("A1") = Mid$(Range("A1"), 1, 3)
End Sub
Eine Formel, die in der Formelzelle deren Wert verändert, kenne ich nicht.