Dim rng as Range
set rng = Range("B9").currentRegion
rng(rng.count).Select

or
Dim rng as Range
set rng = Range("B9").currentRegion
rng.Select
rng(rng.count).Activate

if you want it to the the active cell in multicell selection.


--
Regards,
Tom Ogilvy


"Luc" wrote in message
...
Within a 'CurrentRegion.Select' i want to select the bottom right cell in
this selection.
What code should i use.

Thanxxx

Luc




--------------------------------------------------------------------------------
Mijn Postvak In wordt beschermd door SPAMfighter
340 spam-mails zijn er tot op heden geblokkeerd.
Download de gratis SPAMfighter vandaag nog!