Bereich selektieren
07.04.2005 07:06:50
Erich
habe ein Makro mit dem die letzte Zelle eines zusammenhängenden Bereichs angezeigt wird.
Möchte das so ändern, dass der ausgewählte Bereich aber selektiert wird.
Dabei soll die erste Zeile variabel per InputBox gewählt werden:
Sub LastCell3()
Dim LoErste As Long ' erste Zeile zum selektieren
LoErste = InputBox("Ab welcher Zeile soll selektiert werden?")
With Range("A" & LoErste).CurrentRegion
''''#### hier zusammenhängenden Bereich selektieren
''''#### statt Angabe MsgBox letzte Zelle des Bereichs?
MsgBox .Cells(.Cells.Count).Address
End With
End Sub
Besten Dank für eine Hilfe!
mfg
Erich
EXCEL-Shareware und Freeware: http://www.toolex.de
EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com