Saltar al contenido principal

¿Cómo rodear una celda en Excel?

Cuando edita una hoja de trabajo, es posible que desee dibujar un círculo alrededor de una celda para mostrarla obviamente tal como se muestra a continuación. Ahora te presentaré algunos trucos para que circules alrededor de una celda en Excel.

Círculo alrededor de una celda con forma ovalada

Circula alrededor de una celda con VBA


flecha azul burbuja derecha Círculo alrededor de una celda con forma ovalada

Para rodear una celda, debe insertar una forma ovalada.

1. Hacer clic en recuadro > FormasY seleccione oval forma de la Formas básicas sección de la lista. Ver captura de pantalla:

doc-círculo-alrededor-celda-1

2. Dibuja el óvalo para rodear la celda que necesitas. Ver captura de pantalla:

doc-círculo-alrededor-celda-2

3. Haga clic derecho en la forma y seleccione Forma de formato desde el menú contextual.

doc-círculo-alrededor-celda-3

4. En el Forma de formato diálogo (o Forma de formato panel), haga clic en Llene pestaña y arrastre la flecha de Transparencia a la derecha para asegurarse 100% mostrando en el cuadro de texto. Ver captura de pantalla:

doc-círculo-alrededor-celda-4

5. Cierre el diálogo. Ahora puede ver que hay un círculo alrededor de la celda.

doc-círculo-alrededor-celda-6

Consejo: De forma predeterminada, la forma se moverá y cambiará de tamaño con la celda.

doc-círculo-alrededor-celda-7


flecha azul burbuja derecha Circula alrededor de una celda con VBA

Si desea rodear rápidamente una celda, puede usar el código VBA.

1. Seleccione la celda que desea marcar y presione Alt + F11 llaves juntas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic en recuadro > Módulo y copie el siguiente código VBA en la ventana emergente.

VBA: círculo alrededor de una celda.

Sub DrawCircle()
	'Updateby20141105
	Dim Arng As Range
	Dim WorkRng As Range
	Set WorkRng = Application.Selection
	For Each Arng In WorkRng.Areas
		With Arng
			x = Arng.Height * 0.1
			y = Arng.Width * 0.1
			Application.ActiveSheet.Ovals.Add Top: = .Top - x, Left: = .Left - y, _
			Height: = .Height + 2 * x, Width: = .Width + 1.5 * y
			With Application.ActiveSheet.Ovals(ActiveSheet.Ovals.Count)
				.Interior.ColorIndex = xlNone
				.ShapeRange.Line.Weight = 1.25
			End With
		End With
	Next
	WorkRng.Select
End Sub

3. Prensa F5 tecla o clic Ejecutar para ejecutar el código VBA, ahora la celda seleccionada está rodeada por un círculo.

Consejos:

(1) Si selecciona varias celdas adyacentes en el primer paso, esta macro de VBA rodeará estas celdas juntas.

(2) Si selecciona varias celdas no adyacentes en el primer paso, esta macro de VBA rodeará cada celda individualmente.

doc-círculo-alrededor-celda-8

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo.  Haga clic aquí para obtener la función que más necesita...

Descripción


Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
THAKING YOU.........!
This comment was minimized by the moderator on the site
Thank you so much for this tip! I used the macro and it worked fantastically. I added macro multiple times for different colored ovals. One question - how do I shift the oval over to right on the cell slightly. I think this would better center the oval for the size of my cells. Thanks, Zach
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations