Botón muestre u oculte celdas
¿Hola me ayudas?
Tengo un rango de celdas (102:194) que quiero que se muestren si es que están ocultas y si están visibles que se ocultem.
Creo que es con la función IF THEN pero no logro asignarla a un botón.
Mil Gracias
Tengo un rango de celdas (102:194) que quiero que se muestren si es que están ocultas y si están visibles que se ocultem.
Creo que es con la función IF THEN pero no logro asignarla a un botón.
Mil Gracias
1 Respuesta
Respuesta de 230283
1
Es correcto lo que dices, es posible realizarlo con la condicional IF THEN.
**
1.- Ingresa a Editor de VBA, luego inserta un "modulo" y en dicho modulo ingresa este código:
Sub OcultarMostrarFilas()
If Rows("102:194").EntireRow.Hidden = True Then
Rows("102:194").EntireRow.Hidden = False
Else
Rows("102:194").EntireRow.Hidden = True
End If
End Sub
******
2.- Crea un boton o cuadro, luego incrustas la macro la cual se llama OcultarMostrarFilas
***
3.- Lo he probado y funciona. Cada vez que pulses el botón se Ocultara cuando estén visibles las filas 102 al 194. Y cuando pulses otra vez y estas filas a su vez están ocultas, lo que hará sera devoilver la visibilidad.
===
**
1.- Ingresa a Editor de VBA, luego inserta un "modulo" y en dicho modulo ingresa este código:
Sub OcultarMostrarFilas()
If Rows("102:194").EntireRow.Hidden = True Then
Rows("102:194").EntireRow.Hidden = False
Else
Rows("102:194").EntireRow.Hidden = True
End If
End Sub
******
2.- Crea un boton o cuadro, luego incrustas la macro la cual se llama OcultarMostrarFilas
***
3.- Lo he probado y funciona. Cada vez que pulses el botón se Ocultara cuando estén visibles las filas 102 al 194. Y cuando pulses otra vez y estas filas a su vez están ocultas, lo que hará sera devoilver la visibilidad.
===
