¿Cómo cambiar automáticamente todas las imágenes a "Mover y cambiar tamaño con las celdas" en Excel?
Por defecto, las imágenes insertadas en una hoja de cálculo de Excel están configuradas como “Mover pero no cambiar tamaño con las celdas”, lo que significa que mantienen el mismo tamaño incluso cuando ajustas las dimensiones de las celdas. Si necesitas que las imágenes cambien de tamaño y se muevan junto con sus celdas, normalmente tienes que cambiar esta configuración manualmente para cada imagen. Sin embargo, hay un método rápido para establecer todas las imágenes en “Mover y cambiar tamaño con las celdas” automáticamente utilizando un sencillo código VBA. Este artículo te guiará a través del proceso.
Cambiar automáticamente todas las imágenes a "Mover y cambiar tamaño con las celdas" con código VBA
Cambiar automáticamente todas las imágenes a "Mover y cambiar tamaño con las celdas" con código VBA
El siguiente código VBA puede ayudarte a cambiar rápidamente todas las propiedades de las imágenes a "Mover y cambiar tamaño con las celdas" en una hoja de cálculo. Por favor, sigue los siguientes pasos.
1. Abre la hoja de cálculo que contiene las imágenes que deseas cambiar moviendo y ajustando el tamaño con las celdas, luego abre la ventana de Microsoft Visual Basic for Applications presionando las teclas Alt + F11.
2. En la ventana de Microsoft Visual Basic for Applications, haz clic en Insertar > Módulo. Luego copia y pega el código VBA en la ventana de Código.
Código VBA: cambiar todas las imágenes a "Mover y cambiar tamaño con las celdas"
Sub MoveAndSizeWithCells()
Dim xPic As Picture
On Error Resume Next
Application.ScreenUpdating = False
For Each xPic In ActiveSheet.Pictures
xPic.Placement = xlMoveAndSize
Next
Application.ScreenUpdating = True
End Sub3. Presiona la tecla F5 o haz clic en el botón Ejecutar para ejecutar el código.
Todas las imágenes en la hoja activa ahora están configuradas automáticamente para "Mover y cambiar tamaño con las celdas".
Artículos relacionados:
- ¿Cómo centrar una imagen en una celda de Excel?
- ¿Cómo verificar si una celda contiene una imagen en Excel?
- ¿Cómo insertar una imagen o foto dinámicamente en una celda basada en el valor de la celda en Excel?
- ¿Cómo ampliar una imagen al hacer clic sobre ella en Excel?
Las mejores herramientas de productividad para Office
Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo
- 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 lugar de hacerlo en ventanas separadas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!
Todos los complementos de Kutools. Un solo instalador
El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.
- Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
- Mejor juntos: productividad optimizada en todas las aplicaciones de Office
- Prueba completa de30 días: sin registro ni tarjeta de crédito
- La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos