Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zeichen aus Zeichenkette löschen

Zeichen aus Zeichenkette löschen
reiner
Hallo Leute,
In der Variablen VarX sind Zeilennummern gespeichert wie im folgenden Beispiel:
VarX="$7402:$7402,$7404:$7404,…,$7430:$7430"
Ich will sämtliche Zeilennummern löschen bis auf "$7430:$7430", Geht das evtl. mit der LEN-Funktion? Hat jemand einen Tipp?
mfg
reiner
Anzeige
AW: Zeichen aus Zeichenkette löschen
28.09.2011 10:24:59
Dirk
Hallo!
vieleicht so (ungetestet):
if instr(1,varx,"$7430:$7430)>0 then
varx="$7430:$7430"
end if
Gruss
Dirk aus Dubai
AW: Zeichen aus Zeichenkette löschen
28.09.2011 10:51:51
reiner
hallo Dirk,
die Zeilennummern $7430:$7430 waren nur als Beispiel gedacht, in Wirklichkeit können die Zeilennummenr auch anders heißen; darum ist dein Vorschlag nur bedingt verwendbar
mfg
reiner
Anzeige
AW: Zeichen aus Zeichenkette löschen
28.09.2011 10:55:22
Dirk
Hallo nochmal.
Da musst Du dann schon mal etwas genauer beschreiben, welche Zeilennummern stehen bleiben sollen und nach welchen Kriterien diese definiert sind.
Ansonsten ist das eher schwierig hinzubekommen ;-)
Gruss
Dirk aus Dubai
AW: Zeichen aus Zeichenkette löschen
28.09.2011 11:23:42
reiner
hallo Dirk,
wie schon angedeutet sind die in der VarX gespeicherten Zeilennummern immer unterschiedlich.
Ebenfalls ist die Anzahl der Zeilennummer unterschiedlich.
Es sollen sämtliche in VarX enthaltenen Zeilenummern entfernt werden bis auf die Zeilennummer nach dem letzten Komma (Beispiel: $7430:$7430).
Anders ausgedrückt: die Zeilennummern (Beispiel: $7430:$7430) rechts nach dem letzten Komma sollen allein stehen bleiben.
mfg
reiner
Anzeige
AW: Zeichen aus Zeichenkette löschen
28.09.2011 11:27:21
Rudi
Hallo,
varx = Mid(varx, InStrRev(varx, ",") + 1)
Gruß
Rudi
AW: Zeichen aus Zeichenkette löschen
28.09.2011 11:48:20
reiner
hallo Rudi,
dein Vorschlag funktioniert bestens
ich hatte zwischenzeitlich mit: varx = Right(varx , 11) experimentiert und bin zum gleichen Ergebnis gelangt wie mit deinem Vorschlag.
Kannst du mit kurzen Worten verdeutlichen wodurch sich deine und meine Variante unterscheiden?
mfg
reiner
Anzeige
AW: Zeichen aus Zeichenkette löschen
28.09.2011 12:01:59
Rudi
Hallo,
wodurch sich deine und meine Variante unterscheiden?
deine geht schief, wenn anstatt $7430:$7430 z.B. $5:$5 als letzte Adresse vorkommt. Sind dann ja nur 5 Stellen.
Gruß
Rudi
man könnte den String auch ...
28.09.2011 12:11:44
Rudi
...in ein Array konvertieren und nur das letzte Element nehmen.

Sub yyyy()
Dim VarX, VarY
VarX = "$7402:$7402,$7404:$7404,…,$7430:$7430"
VarY = Split(VarX, ",")
VarX = VarY(UBound(VarY))
End Sub

Gruß
Rudi
Anzeige
AW: man könnte den String auch ...
28.09.2011 12:38:43
reiner
danke Rudi
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige