Spalte einfügen ab ActiveCell.
31.10.2003 10:13:14
ewald
Mein Problem: Im folgenden Code wird die Spalte A
der Tabelle1 in Tabelle2 ab X14 eingefügt.
Nun möchte ich, dass eingefügt wird ab ActiveCell in
Spalte X.
Sub test()
Dim z As Long
Worksheets("Tabelle1").Activate
With Worksheets("Tabelle10")
LaR = Range("a65536").End(xlUp).Row
.Range("x14:x" & L + 10).Value = Range("a4:a" & LaR).Value
End With
End Sub
Ist das machbar?
Vielen Dank.
Grüße