Nombrar un rango

Hola lbenaventea,

Si he marcado un rango del siguiente modo (mas o menos):

Range("D1").Select
Selection.Offset(Endx1Down).Offset(3, 0).Select
Range(Selection, Selection(Endx1Down).Offset(0, 2)).Select

No encuentro sentido a este codigo. ?Que se supone que debe hacer? Seleciona
siempre el mismo rango independientemente del entorno. Ademas me sorprende
que no de error en tiempo de ejecucion al incluir en el las instrucciones
Offset(Endx1Down) y Selection(Endx1Down) donde la constante Endx1Down es
totalmente desconocida para mi y no figura en la ayuda de Excel 2000

?Como puedo ponerle un nombre (aunque sea sin rotulo)?

una forma es

Range("A1").Name = "Test"

o bien

Selection.Name = "Test"

o bien (?)

With Range("D1").End(xlDown).Offset(3, 0)
Range(.Cells, .End(xlDown).Offset(0, 2)).Name="Test"
End With

sin necesidad de seleccionar nada.

Saludos,
KL

KL:
El rango que marqué (y que deseo nombrar) se encuentra, a partir de la celda
D1, bajando hasta el final de una lista de celdas llenas y, bajando,
enseguida, 3 filas más donde, desde la celda a la que llegué, marco mi rango:
bajo hasta el final de un nuevo listado de celdas y abarco 2 columnas más
hacia la derecha. Y éste es el rango que deseo nombrar (ocurre que en mi
pregunta original la sintaxis estaba errónea porque la hice de memoria ya que
no tenía acceso a Excel cuando la formulé y no recordaba con total precisión
cómo debía redactarlas).

La forma correcta de colocar las instrucciones pienso que es semejante a la
que usé como por ejemplo:

Range("D1").Select
Selection.End(xlDown).Select
Selection.Offset(3, 0).Select
Range(Selection, Selection.End(xlDown).Offset(0, 2)).Select

La últiuma línea marca el rango que deseo nombrar y a, partir de la
respuesta tuya, creo que sólo basta agregar la siguiente línea:

Selection.Name = "Test"

Muchas gracias.



"KL" escribió:

Hola lbenaventea,

> Si he marcado un rango del siguiente modo (mas o menos):
>
> Range("D1").Select
> Selection.Offset(Endx1Down).Offset(3, 0).Select
> Range(Selection, Selection(Endx1Down).Offset(0, 2)).Select

No encuentro sentido a este codigo. ?Que se supone que debe hacer? Seleciona
siempre el mismo rango independientemente del entorno. Ademas me sorprende
que no de error en tiempo de ejecucion al incluir en el las instrucciones
Offset(Endx1Down) y Selection(Endx1Down) donde la constante Endx1Down es
totalmente desconocida para mi y no figura en la ayuda de Excel 2000

> ?Como puedo ponerle un nombre (aunque sea sin rotulo)?

una forma es

Range("A1").Name = "Test"

o bien

Selection.Name = "Test"

o bien (?)

With Range("D1").End(xlDown).Offset(3, 0)
Range(.Cells, .End(xlDown).Offset(0, 2)).Name="Test"
End With

sin necesidad de seleccionar nada.

Saludos,
KL