Manipulation objet word incorporé dans Excel

Bonjour à tous,

Je suis nouveau sur le site et débutant en VBA.

Je souhaite savoir s'il est possible de manipuler un objet Word incorporé dans une feuille Excel ?

En effet, lorsque j'incorpore un Word dans ma feuille Excel, le code VBA de mon Excel ne me permet pas d'entrer dans mon Word afin d'y noter des informations présentes dans mon classeur. Est-ce tout simplement possible ?

Merci d'avance

P

Bonjour,

Pour ajouter un texte quelconque dans un "objet word" inséré dans une feuille excel, il faut instancier cet objet word.

La procédure suivante insère la mention "Ajout de texte" dans l'objet n°1 à la suite du contenu existant :

Sub Test()
Dim WordApp As Object

    ActiveSheet.OLEObjects(1).Verb Verb:=xlPrimary
    On Error Resume Next
    Set WordApp = GetObject(, "Word.Application")
    On Error GoTo 0

    WordApp.Selection.TypeText Text:= vbcrlf & "Ajout de texte"

    Set WordApp = Nothing

    ActiveSheet.Range("A1").Select

End Sub

Pierre

Ca marche parfaitement !

Merci beaucoup.