¿Cómo establecer la posición absoluta de un gráfico en Excel?
Normalmente, al crear o mover un gráfico en Excel, es probable que acabe en una posición aleatoria. Sin embargo, en ciertos casos especiales, puede necesitar colocarlo con precisión; por ejemplo, alineado exactamente con la celda A1 o dentro del rango A1:D5. A continuación, le presentamos una macro VBA para establecer la posición absoluta de un gráfico en Excel.
- Aplicar VBA para establecer la posición absoluta de un gráfico en Excel
- Una herramienta increíble para establecer la posición absoluta de un gráfico en Excel
Aplicar VBA para establecer la posición absoluta de un gráfico en Excel
Por ejemplo, ha creado un gráfico y lo ha colocado en una posición aleatoria en la hoja de cálculo, tal como se muestra en la siguiente captura de pantalla. A continuación, le presentamos una macro VBA que le permitirá mover el gráfico de forma rápida y sencilla a una posición absoluta y precisa.
1. Seleccione el gráfico al que desea asignar una posición absoluta y pulse las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haga clic en Insertar > Módulo y pegue la macro VBA que aparece a continuación en la nueva ventana del módulo.
VBA: Establecer la posición absoluta de un gráfico en Excel
Sub Test()
Dim xRg As Range
Dim xChart As ChartObject
Set xRg = Range("D1:J13")
Set xChart = ActiveSheet.ChartObjects(1)
With xChart
.Top = xRg(1).Top
.Left = xRg(1).Left
.Width = xRg.Width
.Height = xRg.Height
End With
End Sub
Nota: En el código anterior, Set xRg = Range("D1:J13") indica que el gráfico se moverá y colocará en el rango D1:J13. Puede ajustar este rango según sus necesidades.
3. Pulse la tecla F5 o haga clic en el botón Ejecutar para ejecutar esta macro VBA.
Ahora verá que el gráfico se ha desplazado a la posición exacta que especificó en la macro de VBA. Consulte la siguiente captura de pantalla:
Una herramienta increíble para establecer la posición absoluta de un gráfico en Excel
Si tiene instalado Kutools para Excel, puede usar su potente herramienta para gráficos –Establecer posición absoluta del gráfico– y mover o redimensionar un gráfico dentro de un rango limitado en Excel.
1. Seleccione el gráfico al que desea asignar una posición absoluta y haga clic en Kutools > Gráficos > Herramientas de gráficos > Establecer posición absoluta del gráfico.
2. En el cuadro de diálogo emergente, indica la posición a la que quieres mover el gráfico y haz clic en el botón Aceptar.
Ahora, el gráfico seleccionado se ha movido a la posición indicada y, al mismo tiempo, se ha redimensionado al rango limitado. Consulte la siguiente captura de pantalla:
Kutools para Excel: potencie Excel con más de 300 herramientas esenciales, agilice y simplifique su trabajo, y aproveche las funciones de IA para un procesamiento de datos más inteligente y una mayor productividad.Consígalo ahora
Artículos relacionados:
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos