Forum |  HardWare.fr | News | Articles | PC | Prix | S'identifier | S'inscrire | Aide | Shop Recherche
328 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Insérer des images avec légende dans word 2010

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Insérer des images avec légende dans word 2010

n°2267758
boro72
Posté le 15-10-2015 à 11:10:26  profilanswer
 

Bonjour,
 
Un script vba qui semble simple mais que je n'arrive pas à faire marcher comme je veux.
Je réalise un script qui insère des images (fichiers png) dans le document courant avec, après chaque image une légende qui est le nom du fichier.
 
Alors pour insérer des images je fais :
            Selection.InlineShapes.AddPicture FileName:=sFile
            Selection.TypeParagraph
Et pour insérer du texte après je fais :
            Set oPar = ActiveDocument.Paragraphs.Add
            oPar.Range.Text = sFile
            oPar.Range.Style = "Normal"
 
Le problème que j'ai est que les images se retrouvent toutes en début de document, rangées en ordre inverse (la dernière image insérée dans la boucle se retrouve en premier dans le document)
et les légendes se retrouvent toutes en semble à la fin du document.
 
Que se passe-t-il ?
 
 

mood
Publicité
Posté le 15-10-2015 à 11:10:26  profilanswer
 

n°2267852
Marc L
Posté le 16-10-2015 à 10:59:19  profilanswer
 

 
            Bonjour,
 
            il se passe qu'à la ligne n° …  Ah zut, le code n'a pas été balisé malgré l'icône dédiée et les règles de ce forum ‼
 
            Le VBA ne se trompant jamais, c'est juste une grossière erreur de conception !
            L'insertion s'effectuant toujours au même endroit …   :ange:
             
            Donc en déplaçant le point d'entrée, en insérant une ligne comme manuellement via la touche Entrée
            Et l'Enregistreur de macros est l'ami du débutant !
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Insérer des images avec légende dans word 2010

 

Sujets relatifs
Comment programmer un tirage d'images au hasard ?Images webcam
Arrière plan CSS en 3 images .soucis !Création d'une sous gallerie d'images
VBA Word et zones de dessinsComment générer des images de 256 px par 240 px de façon automatique
[VBA] Renseigner des signets Word dans une boucle For.Problème de macro et d'importation d'un fichier Word
Images liens collées verticalement... 
Plus de sujets relatifs à : Insérer des images avec légende dans word 2010


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite) / Groupe LDLC / Shop HFR