Bonjour
 
Je vous expose mon problème, je suis dans un classeur excel (feuille de calcul) je souhaiterai inserer un objet word et pouvoir ecrire dedans.
 
 
Sub feuille_word()
Dim xlApp As Object ' Déclare la variable
Set xlApp = ActiveSheet.OLEObjects.Add(ClassType:="Word.Document.8", Link:=False, _
DisplayAsIcon:=False)
xlApp.Activate
End Sub
 
j'arrive bien à creer mon object word puis à l'activer mais je n'arrive pas écrire dedans.
merci pour votre aide.