Range.Select
08.05.2007 09:44:00
Christian
mit dem unten stehenden Script möchte ich die letzte benutzte Zelle bestimmen, an die Variable "l" übergeben und dann mit dieser Adresse und der Startzelle "B2" den gesamten Bereich selektieren (..und später kopieren).Die Übergabe der letzten Zelle an die Variable "l" klappt auch, das Selektieren verursacht abe immer eine Fehlermeldung.
Was mache ich falsch?
Danke für die Mühen!
Private Sub CommandButton1_Click()
Dim l As String
Sheets("Tabelle1").Activate
l = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Address
Range("B2: & l").Select
End Sub
Gruß
Christian
Anzeige