Mostrar y ocultar

prueba con algo así:

Range("13:13,15:15,17:17,20:20,21:21,23:24,26:26").EntireRow.Hidden =
Not (Range("13:13").EntireRow.Hidden)

donde mis columnas son 13, 15, 17, 20, 21, 23 y 24, 26

Saludos,
Francisco.

"Nacho" escribió en el mensaje
news:

Hola amigos,

He hecho una hoja de cálculo con unas 20 columnas. Unas 15 de ellas las
empleo en cálculos auxilares. Me gustaría poder tener un botoncito que me
ocultase y desocultase estas columnas auxiliares, ya que al no ser
consecutivas es muy pesado tener que estar seleccionándolas para poder
ocultar y desocultar. ¿Es posible tener un botón que me permita ocultar y
mostrar estas columnas auxiliares? Muchas gracias

Hola Nacho, similar a la respuesta de Francisco, puedes hacer lo siguiente:

1. Copia el siguiente código en un módulo (editor de Visualbasic)

_ _ _ _ Inicio de Código_ _ _ _ _ _ _

Sub Ocultarmostrar()
If Selection.EntireColumn.Hidden = False Then
Selection.EntireColumn.Hidden = True
Else
Selection.EntireColumn.Hidden = False
End If
End Sub
_ _ _ _ Fin de Código_ _ _ _ _ _ _

2. Ya tienes una macro que muestra y oculta las columnas donde estés
posicionado. Si quieres cambiar para que se oculten las filas, cambia la
palabra column por la palabra row.

3. Para mostrar celdas ocultas, debes seleccionar celdas antes y después,
para que funcione la macro.

Avisame y te envío un archivo de ejemplo.

Saludos

Oscar E.W.V.
Sevilla - España
"Francisco M" escribió:

prueba con algo así:

Range("13:13,15:15,17:17,20:20,21:21,23:24,26:26").EntireRow.Hidden =
Not (Range("13:13").EntireRow.Hidden)

donde mis columnas son 13, 15, 17, 20, 21, 23 y 24, 26

Saludos,
Francisco.

"Nacho" escribió en el mensaje
news:
> Hola amigos,
>
> He hecho una hoja de cálculo con unas 20 columnas. Unas 15 de ellas las
> empleo en cálculos auxilares. Me gustaría poder tener un botoncito que me
> ocultase y desocultase estas columnas auxiliares, ya que al no ser
> consecutivas es muy pesado tener que estar seleccionándolas para poder
> ocultar y desocultar. ¿Es posible tener un botón que me permita ocultar y
> mostrar estas columnas auxiliares? Muchas gracias
>

¿Es imposible de hacer? ¿A nadie le ha surgido este problema? Gracias de
antemano



"Nacho" escribió en el mensaje
news:

Hola amigos,

He hecho una hoja de cálculo con unas 20 columnas. Unas 15 de ellas las
empleo en cálculos auxilares. Me gustaría poder tener un botoncito que me
ocultase y desocultase estas columnas auxiliares, ya que al no ser
consecutivas es muy pesado tener que estar seleccionándolas para poder
ocultar y desocultar. ¿Es posible tener un botón que me permita ocultar y
mostrar estas columnas auxiliares? Muchas gracias

Nacho, a ver si el archivo que te envío al correo te sirve.

Saludos

Óscar E.W.V.
Sevilla - España


"Nacho" escribió:

¿Es imposible de hacer? ¿A nadie le ha surgido este problema? Gracias de
antemano



"Nacho" escribió en el mensaje
news:
> Hola amigos,
>
> He hecho una hoja de cálculo con unas 20 columnas. Unas 15 de ellas las
> empleo en cálculos auxilares. Me gustaría poder tener un botoncito que me
> ocultase y desocultase estas columnas auxiliares, ya que al no ser
> consecutivas es muy pesado tener que estar seleccionándolas para poder
> ocultar y desocultar. ¿Es posible tener un botón que me permita ocultar y
> mostrar estas columnas auxiliares? Muchas gracias
>

Gracias, justo lo que buscaba



"Oscar W.V." escribió en el mensaje
news:

Nacho, a ver si el archivo que te envío al correo te sirve.

Saludos

Óscar E.W.V.
Sevilla - España


"Nacho" escribió:

¿Es imposible de hacer? ¿A nadie le ha surgido este problema? Gracias de
antemano



"Nacho" escribió en el mensaje
news:
> Hola amigos,
>
> He hecho una hoja de cálculo con unas 20 columnas. Unas 15 de ellas las
> empleo en cálculos auxilares. Me gustaría poder tener un botoncito que
> me
> ocultase y desocultase estas columnas auxiliares, ya que al no ser
> consecutivas es muy pesado tener que estar seleccionándolas para poder
> ocultar y desocultar. ¿Es posible tener un botón que me permita ocultar
> y
> mostrar estas columnas auxiliares? Muchas gracias
>