Ocultar columnas

Hola, Anibal.

Supongamos que la celda que va a controlar el número de columnas visibles es
A1. Primero, deberías validar el dato que contiene, pues sería incómodo que
alguien colocara allí un cero o un valor no válido como -2.75. Selecciona la
celda (en este ejemplo, supongo que es A1), y haces clic en Datos -
Validación. En el separador Configuración, en el cuadro Permitir, selecciona
"Número", en Datos selecciona "Mayor que", y en Mínimo seleccionas "0". Lo
que selecciones en el separador "Mensaje entrante" y en "Mensaje de error",
lo dejo a tu criterio.

Ahora diseñemos el proceso. Vas a necesitar modificar el evento "Change" de
la hoja en la que quieres implementar el proceso. En este evento, debes
detectar si la celda modificada fue A1, y en caso afirmativo, mostrar las
primeras columnas, hasta la indicada en el valor de A1, y luego ocultar el
resto. El proceso sería el siguiente:

1. Asegúrate que solamente esté abierto el archivo que vas a modificar.
Esto te puede prevenir muchos errores.

2. Haces clic en Herrameintas - Macro - Editor de Visual Basic.

3. Al lado izquierdo, haces doble clic en la hoja que deseas.

4. Al lado derecho te aparecerá una ventana en blanco. Pegas el siguiente
código:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Target.Address = "$A$1" Then
Range(Cells(1, 1), Cells(1, Range("A1").Value)).EntireColumn.Hidden
= False
Range(Cells(1, Range("A1").Value + 1), Cells(1,
256)).EntireColumn.Hidden = True
End If
Application.ScreenUpdating = True
End Sub

5. Cierras la ventana de Visual Basic.

6. Prueba cambiar el valor de A1 y verifica si es correcto.

Espero que sea lo que necesitas. Siempre comenta cómo te fue, pues esto es
importante para las otras personas que lean tu duda y vean las respuestas
planteadas.

Saludos.



"Anibal" escribió:

Como puedo hacer para ocultar columnas dependiendo del valor de una
celda, supongamos que tengo 24 columnas que representan meses columna A
=1, columna B =2 y asi hasta la columna 24.
En la celda que menciono arriba quiero poner 6 que equivalen a 6 meses.
Quisiera que se oculten desde el mes 7 hasta el 24. Saludos y gracias.

Hola David
El código que me enviaste es parecido a lo que necesito, debido a la
necesidad de no ocultar algunas columnas a la izquierda y tampoco las
columnas a continuación del mes 24, ej. de la columna A hasta la J
tengo datos que no quiero que se oculten, desde la columna K hasta la
AH son los 24 meses y despues de la columna AH tambien tengo datos que
no quiero que se oculten es decir que las columnas que necesito que se
oculten comienzan despues del los meses que ingreso contando como 1 la
columna K, suponiendo que sean 6 meses quisiera que se oculte desde la
columna Q hasta la AH solamente.
Intente modificar el código y creo que estoy cerca de ocultar las
columnas que necesito pero tengo un problema, la celda donde se cargan
los meses esta en otra hoja y no se como resolverlo.
Si me podes ayudar te lo agradecería y disculpa que no enviara el
problema bien claro.
A la espera de una respuesta te saludo y muchas gracias por la
atención.

"Anibal" escribió:

> Como puedo hacer para ocultar columnas dependiendo del valor de una
> celda, supongamos que tengo 24 columnas que representan meses columna A
> =1, columna B =2 y asi hasta la columna 24.
> En la celda que menciono arriba quiero poner 6 que equivalen a 6 meses.
> Quisiera que se oculten desde el mes 7 hasta el 24. Saludos y gracias.
>
>

Carpeta
Descripción
Dirección

1
** Microsoft Excel *
http://esnips.com/web/GabrielRaigosa

2
Archivos para usar en clase
http://esnips.com/web/RaigosaClase

3
Fechas y Horas
http://esnips.com/web/RaigosaFechasHoras

4
Formato y Formato Condicional
http://esnips.com/web/RaigosaFormatos

5
Foro Excel
http://esnips.com/web/ForoExcel

6
Funciones de Busqueda
http://esnips.com/web/RaigosaBusqueda

7
Funciones de Texto
http://esnips.com/web/RaigosaTexto

8
Funciones Financieras
http://esnips.com/web/RaigosaFinancieras

9
Funciones Logicas
http://esnips.com/web/RaigosaLogicas

10
Graficos con Excel
http://esnips.com/web/RaigosaGraficos

11
Grupo (Sabados)
Privado

12
Grupo (Viernes)
Privado

13
Grupo Excel Septiembre
Privado

14
Juegos con Excel
http://esnips.com/web/RaigosaJuegosExcel

15
Macros con Excel
http://esnips.com/web/Macros-con-Excel

16
Manuales Excel
http://esnips.com/web/RaigosaManuales

17
Paginas WEB
http://esnips.com/web/RaigosaPaginasExcel

18
Practicas - XLS
http://esnips.com/web/RaigosaPracticasXLS

19
Tablas Dinámicas
http://esnips.com/web/RaigosaTablasDinamicas

20
TEST
http://esnips.com/web/GabrielRaigosa-test

21
Validación
http://esnips.com/web/RaigosaValidacion

22
Varios
http://esnips.com/web/RaigosaVarios

23
VBA - Visual Basic para Aplicaciones
http://esnips.com/web/RaigosaVBA



Gabriel Raigosa
http://esnips.com/web/Raigosa
http://esnips.com/web/ForoExcel
"Anibal" escribió en el mensaje
news:
| Como puedo hacer para ocultar columnas dependiendo del valor de una
| celda, supongamos que tengo 24 columnas que representan meses columna A
| =1, columna B =2 y asi hasta la columna 24.
| En la celda que menciono arriba quiero poner 6 que equivalen a 6 meses.
| Quisiera que se oculten desde el mes 7 hasta el 24. Saludos y gracias.
|