Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

in allen markierten Zellen letzte 2 Zeichen lösche

Forumthread: in allen markierten Zellen letzte 2 Zeichen lösche

in allen markierten Zellen letzte 2 Zeichen lösche
05.11.2006 13:51:41
Fred
Hallo,
ich möchte gerne bei einigen markierten Zellen jeweils die letzten 2 Zeichen löschen.
Es handelt sich um hunderte von Zellen in verschiedenen Spalten, also das
von Hand zu machen wäre ne menge Arbeit.
Hätte da jemand eine Lösung ?
Gruß
FR
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: in allen markierten Zellen letzte 2 Zeichen lösche
ransi
Hallo
versuchs mal so:

Sub ungetestet()
dim zelle as range
for each zelle in selection
zelle=left(zelle,len(Zelle)-2)
next
End Sub

ransi
AW: in allen markierten Zellen letzte 2 Zeichen lösche
05.11.2006 14:15:40
Fred
Hallo Ransi,
alles super geklappt !
Ich danke dir.
Gruß
FR
AW: in allen markierten Zellen letzte 2 Zeichen lösche
05.11.2006 14:12:23
chris
Hallo , meinst du etwa soetwas ?

Sub löschen()
Dim s  As Range
For Each s In Selection
s = Left(s.Text, Len(s.Text) - 2)
Next
End Sub

Anzeige
AW: in allen markierten Zellen letzte 2 Zeichen lösche
05.11.2006 14:17:42
Fred
Hallo chris b,
ja so geht es.
Ich danke auch dir für deine Bemühungen.
Gruß
FR

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige