Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
24.04.2024 17:19:09
Anzeige
Archiv - Navigation
908to912
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
908to912
908to912
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

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

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

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

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige