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

Forumthread: Inhalt von Zellen (OP12) finden und kopieren

Inhalt von Zellen (OP12) finden und kopieren
06.09.2004 16:21:44
Zellen
Liebe Excel Freunde,
ich habe folgendes Problem. Ich habe 1 Spalte deren Zellen eine Aneinanderreihung von mehreren OP sind. Insgesamt 350 Zeilen.
Bsp einer Zelle: Op2, Op9,Op10, Op12
Die Zellen sind auch durch mehrere Leerzeilen unterbrochen
Immer wenn der Operator OP12 erscheint soll die gesamte zeile in ein anders AB kopiert werden. Kann jemand helfen? Danke im vorraus!!!
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Inhalt von Zellen (OP12) finden und kopieren
Zellen
Hallo Carsten,
mal eine einfache Möglichkeit, die du mit deinem angegebenen Level bestimmt unmsetzen kannst:

Sub OP12()
Dim lgQuell As Long
Dim lgZiel As Long
For lgQuell = 1 To Range("A65536").End(xlUp).Row
If Cells(lgQuell, 1) Like "*Op12*" Then
lgZiel = lgZiel + 1
Rows(lgQuell).Copy Sheets("Tabelle6").Rows(lgZiel)
End If
Next
End Sub

Gruß
Peter
Anzeige
;

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