¿Cómo rotar una imagen en Excel según el valor de una celda?
En Excel, podemos rotar una imagen arrastrando con el ratón, pero ¿alguna vez ha probado a rotar una imagen según el valor de una celda? Por ejemplo, la imagen girará 90 grados si la celda A1 contiene el valor 90, tal como se muestra en la siguiente captura de pantalla.
Rotar una imagen en función del valor de una celda con código de macro
Rotar una imagen en función del valor de una celda con código de macro
Solo mediante un código de macro podrá rotar una imagen en función del valor de una celda en Excel.
1. Introduzca en la celda A1 el valor según el cual desee rotar la imagen y, a continuación, seleccione la imagen que quiera rotar.
2. Pulse Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones y haga clic en Insertar > Módulo para insertar un nuevo Módulo en blanco. Vea la captura de pantalla:
3. Pegue el siguiente código en el Módulo y, a continuación, pulse F5 para ejecutar el código. Vea la captura de pantalla:
VBA: Rotar imagen según el valor de una celda
Sub RotateImage()
Selection.ShapeRange.IncrementRotation ActiveSheet.Range("A1").Value
End Sub
Nota: en el código, A1 es la celda en función de la cual desea rotar la imagen; puede cambiarla según sus necesidades.
Artículos relacionados:
- ¿Cómo rotar el texto del encabezado o pie de página en orientación apaisada en Excel?
- ¿Cómo rotar una tabla 90 o 180 grados en Excel?
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