Macro:rutina para seleccionar celdas

Hola expertos! Haber si podéis ayudarme
Necesito una rutina para para seleccionar un rango de celdas desde la celda activa hasta la ultima con datos. Tengo esta que funciona correctamente :
Range("n48", Range( "n48"). End(x1Down)).select
 pero en la que quiero ahora no tengo el rango definido ya que en cada hoja puede ser diferente osea que deberia partir de la celda activa . Quiero decir una rutina que partiendo de la celda activa me selecione el rango desde esa hasta la ultima celda con datos.
Saludos y gracias de antemano