vba excel (VBA)

Martin Asal @, Freitag, 22.07.2016, 12:15 (vor 1216 Tagen) @ Komila

Tabelle1.Cells(Rows.Count, 1).End(xlUp)
Gehe von Tabelle1!A1048576 zur untersten Zelle in Spalte A, in der etwas steht.
.Offset(1, 0).Row
und nun speichere die Nummer der Zeile in erow. (Das "Offset" wäre wohl verzichtbar)


ActiveSheet.Paste Destination:=Worksheets("Tabelle1").Range(Cells(erow, 1), Cells(erow, 4))

Kopiere ins aktive Tabellenblatt den Inhalt aus 4 Zellen von Tabelle1, nämlich die Zellen erow,1 bis erow,4


Martin


gesamter Thread:

 RSS-Feed dieser Diskussion

powered by my little forum