J'ai créé un modèle de document dans lequel j'ai insérer des feuilles de
calcul Excel.
Le document contient également des signets et une petite application VBA
pour permettre à l'utilisateur de saisir les informations dans un formulaire
qui sont ensuite insérées dans le document.
Comment puis-je compléter les feuilles de calcul Excel avec les informations
saisies dans le masque de saisie.
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
Anacoluthe
Bonjour !
'Charly' nous a écrit ...
J'ai créé un modèle de document dans lequel j'ai insérer des feuilles de calcul Excel. Comment puis-je compléter les feuilles de calcul Excel
Une fois l'objet incorporé activé et déclaré comme objet Excel vous le manipulez comme n'importe quel objet Excel :
Dim maFeuille As Excel.Workbook With ActiveDocument.InlineShapes(1).OLEFormat If .ClassType = "Excel.Sheet.8" Then .Activate Set maFeuille = .Object maFeuille.ActiveSheet.Cells(1, 1).Value = "Bonjour d'Excel" End If End With
(Vous devez évidemment référencer dans VBE la librairie Excel dans Outils / Références )
Anacoluthe « L'homme se découvre quand il se mesure avec l'objet. » - Antoine de SAINT-EXUPÉRY
Bonjour !
'Charly' nous a écrit ...
J'ai créé un modèle de document dans lequel j'ai insérer des feuilles de
calcul Excel.
Comment puis-je compléter les feuilles de calcul Excel
Une fois l'objet incorporé activé et déclaré comme objet Excel
vous le manipulez comme n'importe quel objet Excel :
Dim maFeuille As Excel.Workbook
With ActiveDocument.InlineShapes(1).OLEFormat
If .ClassType = "Excel.Sheet.8" Then
.Activate
Set maFeuille = .Object
maFeuille.ActiveSheet.Cells(1, 1).Value = "Bonjour d'Excel"
End If
End With
(Vous devez évidemment référencer dans VBE la librairie Excel
dans Outils / Références )
Anacoluthe
« L'homme se découvre quand il se mesure avec l'objet. »
- Antoine de SAINT-EXUPÉRY
J'ai créé un modèle de document dans lequel j'ai insérer des feuilles de calcul Excel. Comment puis-je compléter les feuilles de calcul Excel
Une fois l'objet incorporé activé et déclaré comme objet Excel vous le manipulez comme n'importe quel objet Excel :
Dim maFeuille As Excel.Workbook With ActiveDocument.InlineShapes(1).OLEFormat If .ClassType = "Excel.Sheet.8" Then .Activate Set maFeuille = .Object maFeuille.ActiveSheet.Cells(1, 1).Value = "Bonjour d'Excel" End If End With
(Vous devez évidemment référencer dans VBE la librairie Excel dans Outils / Références )
Anacoluthe « L'homme se découvre quand il se mesure avec l'objet. » - Antoine de SAINT-EXUPÉRY
