Intégrer plusieurs imsages dans word ou open

nini -  
m@rina Messages postés 27507 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

je voudrai intégrer plusieurs photos dans word 2003 et les mettre 2 par pages, les mettre toutes au même format et les numéroter comme un petit album.
c'est épuisant de le faire manuellement.
Peut être avec une macro en choisisant un répertoire?
Si vous avez la solution avec open office, je prends...

merci d'avance

1 réponse

  1. m@rina Messages postés 27507 Date d'inscription   Statut Modérateur Dernière intervention   11 562
     
    Bonjour,

    Pour les insérer, tu n'as pas besoin de macro :

    Menu Insertion, image, à partir du fichier
    Tu ouvres ton répertoire, tu sélectionnes tout et OK.

    Ensuite, pour les remettre à la bonne taille, voici une macro (à adapter) :

    sub photos
    Dim photo
    For Each photo In ActiveDocument.InlineShapes
    photo.Height = CentimetersToPoints(8)
    photo.Width = CentimetersToPoints(10)
    Next
    end sub


    m@rina
    1
    1. nini
       
      merci pour ta réponse et peut on numéroter ces photos (ordre croissant) comme pour un album en les mettant toujours deux par page?
      0
    2. m@rina Messages postés 27507 Date d'inscription   Statut Modérateur Dernière intervention   11 562
       
      sans doute... encore faudrait il savoir comment tu veux les numéroter... Avec une légende ? Avec un titre ? Au dessous ? En dessous ?

      m@rina
      0