Configurar el tamaño de las imágenes por lotes en Word

Olivier -  
m@rina Mensajes publicados 27923 Fecha de registro   Estado Moderador Última intervención   -
Hola,

Acabo de realizar un envío masivo en Word para crear fichas que contienen cada una una foto. Funciona y obtengo mis 24 fichas, cada una con su foto. El problema es que Word, en el documento fusionado, muestra las imágenes en un tamaño ridículamente pequeño, mientras que tienen 900 px de ancho. ¿Cómo puedo mostrar todas las imágenes a un tamaño razonable de una sola vez? No es concebible, por supuesto, ajustar el tamaño de cada imagen una por una, lo que significaría hacer 24 operaciones.

Configuración: Windows / Firefox 33.0

2 respuestas

  1. m@rina Mensajes publicados 27923 Fecha de registro   Estado Moderador Última intervención   11 570
     
    Hola,

    ¡Es una macro tan pequeña que no vale la pena prescindir de ella!

    Sub agrandar_fotos()
    Dim imagen as InlineShape
    For Each imagen In ActiveDocument.InlineShapes
    imagen.Width = CentimetersToPoints(4)
    Next
    End Sub


    Solo tienes que poner el ancho deseado en cm (aquí he puesto 4 cm), la altura seguirá automáticamente.
    Si tus imágenes tienen un envoltorio, reemplaza InlineShape(s) por Shape(s).

    m@rina

    Cómo funciona es un foro público. No respondo a preguntas planteadas por MP.
    1