Passer au contenu

Office VBA : insérer des graphiques Excel sous la forme d’images dans Word

Comment : en utilisant la méthode CopyPicture.Vous avez créé des graphiques dans un classeur Excel. Vous souhaitez, à l’aide d’une macro, les insérer automatiquement dans un…

Comment : en utilisant la méthode CopyPicture.Vous avez créé des graphiques dans un classeur Excel. Vous souhaitez, à l’aide d’une macro, les insérer automatiquement dans un document Word sous la forme d’images. Or, le modèle objet de Word ne comporte pas de méthode de
collage spécial pour importer des graphiques Excel en tant qu’image. Vous pouvez le faire manuellement, via la commande Collage spécial du menu Edition, mais pas dans une macrocommande, à moins de faire appel à la méthode CopyPicture d’Excel. Dans
Word, sélectionnez Visual Basic Editor en déroulant Outils/Macro. Puis choisissez la commande Module du menu Insertion. Recopiez alors le listing ci-contre. Et remplacez le chemin C: Classeur1.XLS par celui du classeur Excel, qui contient les
graphiques à copier. L’objet ClasseurExcel.Worksheets (1) permet de sélectionner la première feuille du classeur Excel. Changez-le, le cas échéant, par le numéro de la feuille où se trouve le graphique à copier. Il se peut que la feuille
sélectionnée contienne plusieurs graphiques. Vous devez donc spécifier le graphique à utiliser à l’aide de l’objet ChartObjects(1) en remplaçant 1 par le numéro du graphique à importer. La méthode CopyPicture intervient alors pour copier, sous la
forme d’une image, le graphique qui se trouve dans la page, indiquée elle-même dans le classeur spécifié dans la macro. L’image du graphique est ensuite collée à l’aide de la méthode Paste de l’objet Selection. Enregistrez la macro en fermant la
fenêtre de Visual Basic Editor. Pour insérer l’image du graphique spécifié, déroulez le menu Outils/Macro/Macros. Sélectionnez CollageGraphiqueImage, puis cliquez sur le bouton [exécuter]. L’image est alors placée dans votre document Word à
l’emplacement où se trouve le curseur. Pour copier et coller plusieurs graphiques, il suffit d’alterner autant de fois que nécessaire une commande permettant de sélectionner une feuille, un graphique et la commande de copie avec une instruction
Paste qui permet de le coller. De cette façon, vous pouvez insérer en un clic une image de chaque graphique dun classeur Excel dans un document Word.

🔴 Pour ne manquer aucune actualité de 01net, suivez-nous sur Google Actualités et WhatsApp.


La rédaction