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

Forumthread: VBA Alle Zeilen löschen, die ".com" enthalten

VBA Alle Zeilen löschen, die ".com" enthalten
18.01.2024 12:19:28
Tijana67
Hallo zusammen,

ich habe bereits überall gesucht und bin einfach nicht fündig geworden. Ich habe eine Excel-Liste mit Webseiten (zB. krone.com, leben.at, etc.) und würde gerne alle Zeilen, die das Wortschnipsel ".com" enthalten, löschen. Ich habe folgenden Code, der nur funktioniert, wenn ich eine konkrete Seite zB "krone.com" eingebe. Sobald ich aber "*" den Stern als Platzhalter einsetze, damit er alle Zeilen, die .com enthalten löscht, tut er es nicht.

Sub com()
Dim i As Long
Application.ScreenUpdating = False
For i = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
If Cells(i, 1) = "*.com" Then Rows(i).Delete
Next i
Application.ScreenUpdating = True
End Sub

Habt ihr eine Idee, wie ich das lösen kann?

Danke euch & Liebe Grüße,
Tijana
Anzeige

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

Betreff
Datum
Anwender
Anzeige
If Cells(i, 1) like "*.com" (owT)
18.01.2024 12:49:52
peter
AW: VBA Alle Zeilen löschen, die ".com" enthalten
18.01.2024 12:50:37
Freeloader
Hallo Tijana

Ersetze

If Cells(i, 1) = "*.com" Then


durch

If InStr(1, Cells(i, 1), ".com", vbTextCompare) Then



Gruss Henner
AW: VBA Alle Zeilen löschen, die ".com" enthalten
18.01.2024 13:17:58
daniel
HI
wenn die Werte als feste Texte in den Zellen stehen, gehts etwas einfacher.

with columns(1)

.replace "*.com*", True, xlwhole
.Specialcells(xlcelltypeconstants, 4).EntireRow.Delete
endwith


Gruß Daniel
Anzeige
AW: VBA Alle Zeilen löschen, die ".com" enthalten
18.01.2024 12:58:00
Tijana67
Hi Henner,

super, danke hat geklappt! :-)

LG Tijana
;

Forumthreads zu verwandten Themen

Anzeige
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