Anzeige
Archiv - Navigation
1772to1776
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
Inhaltsverzeichnis

Finde beliebigen Wert in einer Spalte

Finde beliebigen Wert in einer Spalte
31.07.2020 11:23:12
Silke
Hallo an alle,
ich suche verzweifelt nach einem VBA Code.
Er muss in Spalte O ab Zeile 2 (da Überschrift vorhanden) suchen nach einer Zahl. Diese markieren, kopieren und in der selben Zeile 6 Zellen nach links (Spalte I) wieder einfügen. (oder nur verschieben) Nächste Zahl in Spalte suchen und auch 6 Zellen nach links (Spalte I) wieder einfügen usw.
Dann kommt spalte P in dieser muss ebenso gesucht werden, markieren, kopieren und in Spalte K der selben Zelle eingefügt/verschoben werden.
Och habs mit .find versucht aber es klappt hinten und vorne nicht.
Könnt Ihr mir helfen?
Vielen Dank und VG
Silke

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

Betreff
Datum
Anwender
Anzeige
AW: Finde beliebigen Wert in einer Spalte
31.07.2020 11:34:33
Daniel
Hi
das geht so für alle Zahlen als Konstanten.
dim Zelle as Range
for each Zelle in Range("O:O").SpecialCells(xlcelltypeconstants, 1)
Zelle.Copy Zelle.Offset(0, -6)
next
for each Zelle in Range("P:P").SpecialCells(xlcelltypeconstants, 1)
Zelle.Copy Zelle.Offset(0, -5)
next

Gruß Daniel
Danke schön
31.07.2020 12:14:41
Silke
Danke Daniel
Anzeige

308 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige