Skip to main content

¿Cómo ocultar o mostrar una forma específica según el valor de una celda determinada en Excel?

Author: Siluvia Last Modified: 2025-08-06

Puede ocultar o mostrar una forma específica en Excel basándose en el valor de una celda determinada. Siga este método para lograrlo.

Ocultar o mostrar una forma específica basada en el valor de una celda con código VBA

Ocultar o mostrar una forma específica basada en el valor de una celda con código VBA

Por ejemplo, desea mostrar una forma específica al ingresar el número 1 en la celda A1, u ocultar esta forma si la celda A1 tiene otros valores. Ejecute el siguiente código VBA para lograrlo.

1. Haga clic derecho en la pestaña de la hoja que contiene la forma que desea ocultar o mostrar, luego haga clic en Ver código en el menú contextual.

2. Luego se abrirá la ventana de Microsoft Visual Basic para Aplicaciones. Copie y pegue el siguiente código VBA en la ventana de Código.

Código VBA: Ocultar o mostrar una forma específica basada en el valor de una celda

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row = 1 And Target.Column = 1 Then _
        Me.Shapes("Oval 6").Visible = (Cells(1, 1).Value = 1)
End Sub

A screenshot showing the VBA editor with code to hide or unhide shapes based on cell values in Excel

Notas: En el código:

1) Fila=1 y Columna=1 indican la celda específica ubicada en la fila uno y columna uno, Celdas(1, 1) es la celda correspondiente A1.
2) Valor = 1, el número 1 es el valor específico con el que desea mostrar la forma.
3) “Óvalo 6” es el nombre de la forma específica.

Puede modificar estos parámetros según sus necesidades.

3. Presione simultáneamente las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones.

A partir de ahora, cuando ingrese el número 1 en la celda A1, la forma “Óvalo 6” se mostrará. Pero si ingresa otro valor, como el número 2 en la celda A1, la forma “Óvalo 6” se ocultará inmediatamente.

Artículos relacionados:

Las mejores herramientas de productividad para Office

🤖 Asistente de IA de Kutools: Revoluciona el análisis de datos basado en: Ejecución inteligente |Generar código |Crear fórmulas personalizadas |Analizar datos y generar gráficos |Invocar funciones mejoradas…
Funciones populares: Buscar, resaltar o marcar duplicados | Eliminar filas en blanco | Combinar columnas o celdas sin perder datos | Redondear...
Super BUSCARV: Búsqueda con múltiples criterios | Búsqueda de múltiples valores | Búsqueda en varias hojas | Coincidencia difusa....
Lista desplegable avanzada: Crea rápidamente listas desplegables | Lista desplegable dependiente | Lista desplegable con selección múltiple....
Administrador de columnas: Agregar un número específico de columnas | Mover columnas | Cambiar la visibilidad de columnas ocultas | Comparar rangos y columnas...
Funciones destacadas: Cuadrícula de enfoque | Vista de diseño | Barra de fórmulas mejorada | Administrador de libros y hojas de cálculo | Biblioteca de AutoTexto | Selector de fechas | Combinar Datos | Encriptar/Descifrar celdas | Enviar correo electrónico por lista | Super Filtro | Filtro especial (filtro negrita/cursiva/tachado...)...
Top15 conjuntos de herramientas:12 herramientas de texto (Agregar texto, Eliminar caracteres, ...) | Más de50 tipos de gráficos (Diagrama de Gantt, ...) | Más de40 fórmulas prácticas (Calcular edad basada en la fecha de nacimiento, ...) |19 herramientas de inserción (Insertar código QR, Insertar imagen desde ruta, ...) |12 herramientas de conversión (Convertir a palabras, Conversión de moneda, ...) |7 herramientas de combinar y dividir (Combinar filas avanzado, Dividir celdas, ...) | ... y mucho más
Utiliza Kutools en tu idioma preferido: ¡compatible con Inglés, Español, Alemán, Francés, Chino y más de40 idiomas adicionales!

Impulsa al máximo tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para potenciar la productividad y ahorrar tiempo.Haz clic aquí para obtener la función que más necesitas...

Office Tab aporta una interfaz de pestañas a Office y hace tu trabajo mucho más sencillo

  • Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abre y crea varios documentos en nuevas pestañas de la misma ventana, en vez de en nuevas ventanas.
  • ¡Aumenta tu productividad hasta un50% y reduce cientos de clics de ratón cada día!