Macro para ajustar imágenes automáticamente PowerPoint
Publicado por Damffer (1 intervención) el 09/03/2021 23:44:56
A diario debo hacer un reporte en PowerPoint donde pego 4 imágenes por diapositiva y luego las ajusto para que quepan todas en la misma. Quisiera saber cómo automatizar esta tarea ya que se vuelve engorrosa cuando son 40-50 diapositivas.
Estuve leyendo y encontré el siguiente código
With ActiveWindow.Selection.ShapeRange
.Weight= ###
.Width= ###
.Left= ###
.Top= ###
Este funciona cuando es una sola imagen, pero no sé cómo hacerlo cuándo sean varias y que se ajusten automaticamente (dejando un pequeño espacio entre cada una de ellas), además de que el tamaño no importa siempre y cuando se mantenga la relación alto/ancho.
Muchas gracias por la ayuda que me puedan brindar,
Estuve leyendo y encontré el siguiente código
With ActiveWindow.Selection.ShapeRange
.Weight= ###
.Width= ###
.Left= ###
.Top= ###
Este funciona cuando es una sola imagen, pero no sé cómo hacerlo cuándo sean varias y que se ajusten automaticamente (dejando un pequeño espacio entre cada una de ellas), además de que el tamaño no importa siempre y cuando se mantenga la relación alto/ancho.
Muchas gracias por la ayuda que me puedan brindar,
Valora esta pregunta
0