|
VBA - Bereich in erste freie Zelle |
 |
 |
 |
|
Geschrieben von: Marcus Rose
|
|
Sonntag, 27. April 2008 um 08:41 Uhr |
|
Bei diesem Makro könnt Ihr Euch einen Bereich in der Tabelle markieren und diesen markierten Bereich in ein anderes Tabellenblatt, in die erste freie Zeile, kopieren.
Option Explicit
Sub markierten_bereich_kopieren()
Dim Loletzte As Long
With Worksheets("Tabelle2")
Loletzte = IIf(IsEmpty(.Range("A65536")), _
.Range("A65536").End(xlUp).Row + 1, 65536)
Selection.Copy Destination:=.Cells(Loletzte, 1)
End With
End Sub
|
|
Zuletzt aktualisiert am Sonntag, 27. April 2008 um 08:47 Uhr |
VBA Makro Beispiele 