Bonjour

J'ai un document word contenant des objets feuilles de calculs j'aimerai accéder aux feuilles de calculs.
J'arrive a récupérer les objets grâce à ce code mais je n'arrive pas à la feuille

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Dim ins
 For Each ins In ActiveDocument.InlineShapes
   If ins.OLEFormat.ProgID Like "Excel.Sheet*" Then
        ins.OLEFormat.object 'ne marche pas
 
    End If
 Next