Je souhaite insérer à partir de VB, une image dans un document Word à un
endroit bien précis.
Pour celà, j'utilise : WordApp.ActiveDocument.Shapes.AddPicture MonImage
Mais l'image est systématiquement insérée en début de document.
J'ai trouvé ces 2propriétés
WordApp.Selection.Information(wdFirstCharacterColumnNumber) et
WordApp.Selection.Information(wdFirstCharacterLineNumber)
qui me retournent le numéro de ligne et de colonne du point d'insertion.
Ensuite j'utilise ces 2 fonctions
WordApp.ActiveDocument.Shapes(1).IncrementLeft X
WordApp.ActiveDocument.Shapes(1).IncrementTop Y
qui décalent l'image en Points
Mais je n'arrive pas à convertir ce que me retournent les 2 premières en
Points pour les 2 dernières.
Quelqu'un aurait-il une idée, ou même une autre méthode ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
parci
>Bonjour à tous
Je souhaite insérer à partir de VB, une image dans un document Word à un endroit bien précis. Pour celà, j'utilise : WordApp.ActiveDocument.Shapes.AddPicture MonImage Mais l'image est systématiquement insérée en début de document.
J'ai trouvé ces 2propriétés WordApp.Selection.Information(wdFirstCharacterColumnNumber) et WordApp.Selection.Information(wdFirstCharacterLineNumber) qui me retournent le numéro de ligne et de colonne du point d'insertion.
Ensuite j'utilise ces 2 fonctions WordApp.ActiveDocument.Shapes(1).IncrementLeft X WordApp.ActiveDocument.Shapes(1).IncrementTop Y qui décalent l'image en Points
Mais je n'arrive pas à convertir ce que me retournent les 2 premières en Points pour les 2 dernières.
Quelqu'un aurait-il une idée, ou même une autre méthode ?
Tu pourrais connaître la position du point d'insertion (exprimée en points) en utilisant Selection.Information(wdHorizontalPositionRelativeToPage) et Selection.Information(wdVerticalPositionRelativeToPage). Il faut que la sélection soit visible.
-- Message monitoré par axinews : http://www.axinews.com/
>Bonjour à tous
Je souhaite insérer à partir de VB, une image dans un document Word à un
endroit bien précis.
Pour celà, j'utilise : WordApp.ActiveDocument.Shapes.AddPicture MonImage
Mais l'image est systématiquement insérée en début de document.
J'ai trouvé ces 2propriétés
WordApp.Selection.Information(wdFirstCharacterColumnNumber) et
WordApp.Selection.Information(wdFirstCharacterLineNumber)
qui me retournent le numéro de ligne et de colonne du point d'insertion.
Ensuite j'utilise ces 2 fonctions
WordApp.ActiveDocument.Shapes(1).IncrementLeft X
WordApp.ActiveDocument.Shapes(1).IncrementTop Y
qui décalent l'image en Points
Mais je n'arrive pas à convertir ce que me retournent les 2 premières en
Points pour les 2 dernières.
Quelqu'un aurait-il une idée, ou même une autre méthode ?
Tu pourrais connaître la position du point d'insertion (exprimée en points)
en utilisant Selection.Information(wdHorizontalPositionRelativeToPage) et Selection.Information(wdVerticalPositionRelativeToPage).
Il faut que la sélection soit visible.
--
Message monitoré par axinews : http://www.axinews.com/
Je souhaite insérer à partir de VB, une image dans un document Word à un endroit bien précis. Pour celà, j'utilise : WordApp.ActiveDocument.Shapes.AddPicture MonImage Mais l'image est systématiquement insérée en début de document.
J'ai trouvé ces 2propriétés WordApp.Selection.Information(wdFirstCharacterColumnNumber) et WordApp.Selection.Information(wdFirstCharacterLineNumber) qui me retournent le numéro de ligne et de colonne du point d'insertion.
Ensuite j'utilise ces 2 fonctions WordApp.ActiveDocument.Shapes(1).IncrementLeft X WordApp.ActiveDocument.Shapes(1).IncrementTop Y qui décalent l'image en Points
Mais je n'arrive pas à convertir ce que me retournent les 2 premières en Points pour les 2 dernières.
Quelqu'un aurait-il une idée, ou même une autre méthode ?
Tu pourrais connaître la position du point d'insertion (exprimée en points) en utilisant Selection.Information(wdHorizontalPositionRelativeToPage) et Selection.Information(wdVerticalPositionRelativeToPage). Il faut que la sélection soit visible.
-- Message monitoré par axinews : http://www.axinews.com/
