Macro de excel que oculte columnas

Mi excel ah avanzado mucho, interconexión entre varias hojas y cientos de datos, que van a ir aumentando con los días, voy notando que dentro de poco manejarlo se va a volver complicado. Y me seria muy útil poder colocar una o varias macros que oculten y des oculten las columnas con un solo click. Ej. Al hacer click. Ocultar columnas de f a l inclusive, y con el click siguiente des ocultarlas. ( Si es que se puede hacer en una sola macro)

2 respuestas

Respuesta
3

No queda claro si siempre serán las mismas columnas, si es así esta macro te servirá:

Sub ocultaColumnas()
'x Elsamatilde
'atajo de teclado: CTRL O
If Columns("F:L").Hidden = False Then
    Columns("F:L").Hidden = True
Else
    Columns("F:L").Hidden = False
End If
End Sub

Para ejecutarla, lo más práctico sería que tengas un atajo de teclado, por ej: Ctrl O (mayúsc o minúsc). El tema 'Cómo asignar un atajo de teclado' lo tengo explicado en alguna de las páginas de la sección Macros de mi sitio.

Respuesta
1

Estos ejemplos

Sub Ocultar()   
    'Ocultar la fila 1
    'Con un Rango
    ActiveSheet.Range(A1).EntireRow.Hidden  =  False
    'Ocultar la columna 1
    ActiveSheet.Range(A1).EntireColumn.Hidden = False

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Como pegar solamente valores de una celda a otra hoja

Sub CopiarImprimir() ' ' CopiarImprimir Macro ' Application.ScreenUpdating = False Sheets("Imprimir").Select Worksheets("Imprimir"). Range("A4:C50"). Clear Range("E4:J49"). Clear Sheets("Planillas").Select Sheets("Planillas"). Range("G4").Copy...
2 respuestas

Redondear decimales en números arábigos

Sres. T.E. La consulta es la siguiente, necesito una fórmula en excel para llevar los decimales a .00 y .50, ejemplo en una celda tengo el valor 45.12 levarlo a 45.00 en otra tengo 45.42 levarlo a 45.00.
2 respuestas

Mantener el color de un botón al salir de un módulo

Quisiera por favor me ayuden, estoy haciendo una aplicación en vba para un restaurante y necesito lo siguiente: tengo 20 mesas que al momento de abrir el modulo de venta selecciono la mesa y cambia de color y su estado pasa a ocupada la idea es...
2 respuestas

Cómo habilitar o deshabilitar (25) Grupo de opciones en formulario access

Tengo varias encuestas, cada una contiene de 5 a 30 preguntas y un formulario para llenado con 30 marcos de opciones numerados del 1 al 30. ¿Cómo podría habilitar o deshabilitar estos grupos de opciones de acuerdo al número de preguntas? Ejemplo:...
3 respuestas

Sumar dos filas distintas mayor a 0

Quiero sumar dos filas separadas por ejemplo fila 5 de A4 a J4 y fila 10 de A4 a J4, cada fila tiene resultados positivos o negativos, quiero que me sume en la celda B3 por ejemplo los datos positivos y en la celda C3 los datos negativos. Solo se...
2 respuestas

Filtrar ultima fecha según el criterio de una celda

Tengo una tabla de excel con la siguiente información Columna A el código del equipo. (Código único para cada equipo) Columna B la fecha en que se realizo la ultima revisión. Columna C el nombre del equipo. Columna D El tipo de revisión (preventivo,...
2 respuestas

Ocultar entorno access navegar por formularios e informes

Quiero ocultar el entorno de access pero que todo funcione tanto formulario como informes y que el icono salga en la barra de tareas
1 respuesta

Cómo hacer un filtro múltiple en formulario Excel?

Tengo un formulario en Excel con 5 combos combinado(Tipo, Año, Mes, servicio y Especialidad) y un cuadro de lista. La idea es que al seleccionar un valor en el cuadro combinado Tipo, en el cuadro de lista se me filtren los registros con ese valor,...
2 respuestas

Como poder bloquear tablas de access

Tengo un sistema dividido tablas y los formulario y quiero evitar que puedan entrar a las tablas así evito que modificquen algo
2 respuestas

Suma en un formulario de Excel

Estoy realizando un formulario, el cual al salir del ultimo texbox me sume los anteriores, he usado el siguiente código Private Sub base0_Change() On Error Resume Next Me.totalfactura = Round((Me.base0 + Me.base10 + Me.base21 + Me.base4 + Me.base5) +...
2 respuestas