Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1820to1824
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
VBA Zeilen einfügen
15.03.2021 17:32:59
Mary
Hallo,
Ich möchte ein Makro schreiben, mit dem die Werte aus Spalte i in die beiden neuen Spalten x und y eingefügt werden können. Die erste Zeile in Spalte i wird in die erste Zeile x eingefügt, die zweite Zeile in i wird in die erste Zeile in y eingefügt. Dann wird die zweite Zeile in i in die zweite Zeile in x und die dritte Zeile in i in die zweite Zeile in y eingefügt, wie Sie in der Tabelle sehen. Kann mir jemand helfen, den Code zu schreiben? Danke!
i 123,8; 2342; 977,8; 4567; 4283; 0
x 123,8 ; 2342; 977,8; 4567; 4283
y 2342 ; 977,8; 4567; 4283; 0

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

Betreff
Datum
Anwender
Anzeige
AW: VBA Zeilen einfügen
15.03.2021 19:14:38
Daniel
Hi
Übernehmen der Werte:
with Range("X1:Y" & Range("I1").End(xldown).Row - 1)
.Columns(1).FormulaR1C1 = "=RC9"
.Columns(2).FormulaR1C1 = "=R[1]C9"
.Formula = .Value
End With
Oder alles Kopieren
A

With Range("I1:I" & Range("I1").End(xldown).Row - 1)
.Copy .Offset(0, 15)
.Offset(1, 0).Copy .Offset(0, 16)
End with
Gruß Daniel

AW: VBA Zeilen einfügen
16.03.2021 11:51:36
Mary
Hallo Daniel,
super vielen Dank!
Ich habe nur dazu eine Frage, du hast offset 15 und 16 geschrieben, warum? Wenn ich nicht weiß, wie viele Zeilen ich habe, weil ich unterschiedliche Excel Tabellen mit unterschiedlichen Zahlen habe. Wäre das auch möglich?
Danke!
Liebe Grüße,
Mary
Anzeige

318 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige