Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1808to1812
1808to1812
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA - Werte übertragen

Forumthread: VBA - Werte übertragen

VBA - Werte übertragen
02.02.2021 11:10:27
Kurt
Hallo nochmal,
folgender Sachverhalt:
In Reihe A stehen Zahlen. Wenn die Zahl "3" dort vorhanden ist, sollen in die Zeile, wo die "3" ab Reihe B
Daten aus einem "Tabellenblatt 2" (G40:O40) eingefügt werden.
Vielen Dank
Kurt
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - Werte übertragen
02.02.2021 11:44:32
ralf_b
ungetestet.
for i = 1 to cells(rows.count,1).end(xlup).row
if cells(i,1) = "3" or cells(i,1) = "3" then
cells(i,2).resize(,9).value = sheets("Tabellenblatt 2").Range("G40:O40").value
end if
next

AW: VBA - Werte übertragen
02.02.2021 20:32:11
Kurt
Hall Ralf,
Bin gerade erst zum testen gekommen.
Super - funktioniert genau so wie ich es haben wollte.
Vielen Dank
Kurt
Anzeige
AW: VBA - Werte übertragen
02.02.2021 20:44:58
ralf_b
danke für die Rückmeldung ich habe aber gerade gesehen das ich mich verschrieben habe.
if cells(i,1) = "3" or cells(i,1) = 3 then
Hintergrund ist das eine Zahl nicht gleich einem Text ist.
gruß
rb
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige