Columns()

Hola:

checa si te sirve esto:
Worksheets("HOJA1").Range(Cells(1, 20), Cells(1,
255)).EntireColumn.Select


selecciona las columnas de la 20 a la 255.

probablemente tengas que cambiar las comas por punto y coma.


saludos

hola, Des !

Cual es la formula mas parecida a Worksheet(x). Columns(20:250).select
para decir que se seleccionen las columnas 20,21,22,23,..250.
Quisiera no utilizar la notacion alfabetica del ("A:IV")

1) prueba con -> Columns("t:iv").EntireColumn.Select
que es lo mismo que: ActiveSheet.Columns("t:iv").EntireColumn.Select

2) ya que si necesitas 'seleccionar' rangos... solo es posible si la hoja a la que pertenecen esta 'activa' [o sea que]...
si utilizas [p.e.] -> Worksheets("hoja5").Columns("t:iv").EntireColumn.Select
-> cuando la 'hoja5' NO es la hoja 'activa'... el codigo va a fallar

3) [por otro lado] dependiendo de si NO es 'realmente' necesario seleccionar los rangos, puedes afectar los de una hoja desde otra [p.e.]
si necesitas ocultar las columnas 'T:IV' de la hoja5 sin importar cual es la hoja 'activa' [no es necesario seleccionar ni hoja ni rangos]...
-> Worksheets("hoja5").Columns("t:iv").EntireColumn.Hidden = True

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Hola phedro. Gracias.

Utilizo , como tú, la coma.
Probaré. lo que me indicas.
Aún así ¿ no hay nada más directo, del tipo hojarosa.Columns(5:17).font.bold=true?

Saludos
Des

"phedro" escribió en el mensaje
news:

Hola:

checa si te sirve esto:
Worksheets("HOJA1").Range(Cells(1, 20), Cells(1,
255)).EntireColumn.Select


selecciona las columnas de la 20 a la 255.

probablemente tengas que cambiar las comas por punto y coma.


saludos

Hola Héctor, Gracias

> Cual es la formula mas parecida a Worksheet(x). Columns(20:250).select
> para decir que se seleccionen las columnas 20,21,22,23,..250.
> Quisiera no utilizar la notacion alfabetica del ("A:IV")

1) prueba con -> Columns("t:iv").EntireColumn.Select
que es lo mismo que: ActiveSheet.Columns("t:iv").EntireColumn.Select

Necesito un puntero numerico. Con las letras tengo que andar cambiando continuamente. y es un un
cognazo

2) ya que si necesitas 'seleccionar' rangos... solo es posible si la hoja a la que pertenecen esta

'activa' [o sea que]...

si utilizas [p.e.] -> Worksheets("hoja5").Columns("t:iv").EntireColumn.Select
-> cuando la 'hoja5' NO es la hoja 'activa'... el codigo va a fallar

Tengo una cierta alergia a selecionar. Procuro trabajar directamente los rangops. Estoy quitando
todas las trazas de las selecciones anteriores ( que puedo)

3) [por otro lado] dependiendo de si NO es 'realmente' necesario seleccionar los rangos, puedes

afectar los de una hoja desde otra [p.e.]

si necesitas ocultar las columnas 'T:IV' de la hoja5 sin importar cual es la hoja 'activa' [no

es necesario seleccionar ni hoja ni rangos]...

-> Worksheets("hoja5").Columns("t:iv").EntireColumn.Hidden = True

Si no recuerdo mal tambien te puedes ahorrar el EntireColumn( donde me lo ahorro me funciona).
Pero como te decía quisiera no utilizar letras (si es posible)

¿Quieres decir que no hay manera?

Saludos
Des




"Héctor Miguel" escribió en el mensaje
news:uouA8%

hola, Des !

> Cual es la formula mas parecida a Worksheet(x). Columns(20:250).select
> para decir que se seleccionen las columnas 20,21,22,23,..250.
> Quisiera no utilizar la notacion alfabetica del ("A:IV")

1) prueba con -> Columns("t:iv").EntireColumn.Select
que es lo mismo que: ActiveSheet.Columns("t:iv").EntireColumn.Select

2) ya que si necesitas 'seleccionar' rangos... solo es posible si la hoja a la que pertenecen esta

'activa' [o sea que]...

si utilizas [p.e.] -> Worksheets("hoja5").Columns("t:iv").EntireColumn.Select
-> cuando la 'hoja5' NO es la hoja 'activa'... el codigo va a fallar

3) [por otro lado] dependiendo de si NO es 'realmente' necesario seleccionar los rangos, puedes

afectar los de una hoja desde otra [p.e.]

si necesitas ocultar las columnas 'T:IV' de la hoja5 sin importar cual es la hoja 'activa' [no

es necesario seleccionar ni hoja ni rangos]...

-> Worksheets("hoja5").Columns("t:iv").EntireColumn.Hidden = True

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

hola, Des !

[disculpa]... no me percate de que la intencion es NO utilizar la notacion "A:IV" :-((

-> si la necesidad es utilizar un [como le llamas] 'puntero numerico'... prueba:
a) indicando la columna 'inicial' con su numero -> Columns(20)
b) 'extendiendo' la seleccion para agregar otras columnas [MAS LA INICIAL] con un Resize(Filas, Columnas]
[p.e.] Columns(20).Resize(, 237) -etc. etc. etc.-
solo 'nota' que el '237' es una referencia a las columnas 'restantes' a partir de la columna #20 [256 - 19]

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

__ la consulta original __

> Cual es la formula mas parecida a Worksheet(x). Columns(20:250).select
> para decir que se seleccionen las columnas 20,21,22,23,..250.
> Quisiera no utilizar la notacion alfabetica del ("A:IV")

1) prueba con -> Columns("t:iv").EntireColumn.Select
que es lo mismo que: ActiveSheet.Columns("t:iv").EntireColumn.Select

Necesito un puntero numerico. Con las letras tengo que andar cambiando continuamente. y es un un cognazo

2) ya que si necesitas 'seleccionar' rangos... solo es posible si la hoja a la que pertenecen esta 'activa' [o sea que]...
si utilizas [p.e.] -> Worksheets("hoja5").Columns("t:iv").EntireColumn.Select
-> cuando la 'hoja5' NO es la hoja 'activa'... el codigo va a fallar

Tengo una cierta alergia a selecionar. Procuro trabajar directamente los rangops.
Estoy quitando todas las trazas de las selecciones anteriores (que puedo)

3) [por otro lado] dependiendo de si NO es 'realmente' necesario seleccionar los rangos, puedes afectar los de una hoja desde otra [p.e.]
si necesitas ocultar las columnas 'T:IV' de la hoja5 sin importar cual es la hoja 'activa' [no es necesario seleccionar ni hoja ni rangos]...
-> Worksheets("hoja5").Columns("t:iv").EntireColumn.Hidden = True

Si no recuerdo mal tambien te puedes ahorrar el EntireColumn( donde me lo ahorro me funciona).
Pero como te decía quisiera no utilizar letras (si es posible)
Quieres decir que no hay manera?