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

Makro löscht was es nicht löschen soll...

Forumthread: Makro löscht was es nicht löschen soll...

Makro löscht was es nicht löschen soll...
29.09.2007 12:59:17
Pascal
Hallo,
ich glaube ic habe Tomaten auf den Augen, aber ich kann mir folgendes nicht erklären: Aus einer URL Liste löscht mein Makro eine Zeile.
das sind die Zeilen:
http://www.einkauf-guide.de/
http://www.notebookinfo.de/
http://urltra.de/kat/220/preisvergleich-testberichte/
http://reisen.ciao.de/
http://www.medipreis.de/
http://www.med-kolleg.de/medikamente-preisvergleich.html
http://us.bookbutler.com/
http://travel.preisvergleich.de/travel/index.htm
Der Makro Ausschnitt, der löscht lautet:
With Columns(1)
.Replace what:="http://", Replacement:="", lookat:=xlPart
.Replace what:="www.", Replacement:="", lookat:=xlPart
.Replace what:="/*", Replacement:="", lookat:=xlPart
.Replace what:="search?*", Replacement:="", lookat:=xlPart
.Replace what:="209*", Replacement:="", lookat:=xlPart
.Replace what:="url?*", Replacement:="", lookat:=xlPart
.Replace what:="webhp?*", Replacement:="", lookat:=xlPart
.Replace what:="https:*", Replacement:="", lookat:=xlPart
.Replace what:="pagead*", Replacement:="", lookat:=xlPart
End With
folgende Zeile ist anschließend leer:
http://urltra.de/kat/220/preisvergleich-testberichte/
andere, die ähnlich aufgebaut sind wie
http://us.bookbutler.com/
http://travel.preisvergleich.de/travel/index.htm
bleiben erhalten.
Hat irgendjemand eine Idee? Ich komme mir etwas dämlich vor aber ich komme nicht weiter.
Besten Dank für Eure Hilfe!
Pascal

Anzeige

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

Betreff
Datum
Anwender
Anzeige
Gelöst: Doch Tomaten auf den Augen!
29.09.2007 13:14:00
Pascal
Hallo,
Problem gelöst:
Replace what:="url?*", Replacement:="", lookat:=xlPart
war der Verursacher
Besten Dank für etwaige Mühen, Pascal

...what:="url?sa*". ? nicht als Platzhalter
29.09.2007 15:41:00
Pascal
Hallo,
wie bekomme ich es hin, dass eine URL aus einem Feld gelöscht wird, die wie folgt aussieht:
url?satjirutpwetneurtiuoe
aber die folgende nicht:
urlabcd.de
Wenn ich:
with columns(1)
.Replace what:="url?sa*", Replacement:="", lookat:=xlPart
verwende, interpretiert er das Fragezeichen im String als Plazhalter, so dass er auch diese Zeile löscht.
Hat Jemand eine Idee wie ich den Bereich in den Anführungszeichen umschreiben muss?
Besten Dank, Pascal

Anzeige
Tilde ~ vor Fragezeichen, damit kein Platzhalter
29.09.2007 16:48:00
Beate
Hallo Pascal,
wenn ein ? nicht als Platzhalter erkannt werden soll, musst du eine Tilde (~) voranstellen, also:
with columns(1)
.Replace what:="url~?sa*", Replacement:="", lookat:=xlPart
Guckst Du: Platzhalter
Gruß,
Beate

Anzeige
AW: thx
29.09.2007 22:21:33
Pascal
Hallo Beate,
ja klar! Funktioniert prima.
Besten Dank
Pascal
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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