Makro-Verfeinerung?!
Oliver
Ich habe folgendes Makro:
Sub Uebernahme()
Sheets("Tabelle2").Select
Dim laR As Long
laR = Cells(Rows.Count, 2).End(xlUp).Row
Cells(laR + 1, 1).Value = Sheets("Tabelle1").Range("B4").Value
Cells(laR + 1, 2).Value = Sheets("Tabelle1").Range("D4").Value
Cells(laR + 1, 3).Value = Sheets("Tabelle1").Range("F4").Value
End Sub
Dieses Makro führt ganz wunderbar folgendes aus:
Sich ständig ändernde Werte aus Tabelle1, Zelle B4, D4 und F4
werden in Tabelle2 "aufgelistet". Diese Auflistung der Werte
findet bei der ersten Makroausführung in der Tabelle2 in den
Zellen A2, B2, C2 statt. Bei der zweiten Ausführung dann in
Zeile 3, dann Zeile 4....
Ich möchte aber, dass die Auflistung in Tabelle2 bei der ersten
Makroausführung in den Zellen D5, E5 und F5 stattfindet, bei der
zweiten Ausführung dann in D6, E6 und F6, dann in Zeile 7 .....
Ich hoffe, ich habe mich halbwegs verständlich ausgedrückt....
....und jemand weiß Rat...
Danke,
Oliver
Anzeige