Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
596to600
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
596to600
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zahlen suchen, Zeilen kopieren

Zahlen suchen, Zeilen kopieren
14.04.2005 10:11:58
Erich
Hallo EXCEL-Freunde,
habe ein makro bei dem Zahlen gesucht werden und wenn gefunden wird die
komplette Zeile kopiert - soweit so gut.
Beim kopieren wird aber im zweizeiligen Abstand in die neue Tabelle übertragen -
und das möchte ich auf einzeilig abändern und schaffs nicht. Hier die Datei:
https://www.herber.de/bbs/user/21136.xls
Besten Dank für eine Hilfe!
mfg
Erich
EXCEL-Shareware und Freeware: http://www.toolex.de
EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zahlen suchen, Zeilen kopieren
14.04.2005 12:20:47
Dieter
Hallo Erich,
meiner Meinung liegt der Fehler hier:
For zeile1 = 2 To Tab1.Cells(65536, mySpalte).End(xlUp).Row
If Tab1.Cells(zeile1, mySpalte) = myWert1 Then Tab1.Rows(zeile1).Copy Tab2.Rows(zeile2)
zeile2 = Tab2.Cells(65536, 1).End(xlUp).Row + 2
Next
Warum "+2"? Du willst doch nur in die nächste Zeile.
Gruß
Dieter
AW: Zahlen suchen, Zeilen kopieren
15.04.2005 06:19:22
Erich
Hallo Dieter,
danke, das war ein richtiger Hinweis. Ein weiterer Fehler war, dass die erste Spalte
durchsucht wird und dort entscheidend war, welche Zeile als letzte belegt war.
Problem gelöst.
mfg
Erich
EXCEL-Shareware und Freeware: http://www.toolex.de
EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige