VBA: Lecture des données excel dans word

Je fais un formulaire simple pour extraire les données à partir de ma feuille excel, telles que nom, date de naissance et adresse. Et de les insérer dans mon formulaire word, je fais 20 à 30 feuilles à chaque fois, donc je pense qu'il pourrait être en mesure d'enregistrer la copie & collage de temps.

J'ai essayé de suivre ce tutoriel: http://www.makeuseof.com/tag/integrate-excel-data-word-document/
Et créé un bouton avec une simple étiquette nommée m_name, le nom du membre. Mais il me dit Compile error: User-defined type not defined. Et flaged sur la ligne 1.

Je suis l'aide de Word 2003, (je ne suis pas en mesure de trouver des Outils > Référence comme le guide de demande). Je ne sais pas si c'est lié à cette erreur.

Private Sub CommandButton1_Click()
Dim objExcel As Excel.Application
Dim exWb As Excel.Workbook

Set exWb = objExcel.Workbooks.Open("U:\test.xls")
ThisDocument.m_name.Caption = exWb.Sheets("Member's Data").Cells(3, 3)

exWb.Close

Set exWb = Nothing

End Sub
  • Vous avez besoin d'une référence à "Microsoft Excel [version] Object library". Il devrait y avoir un Outils>>Références de l'option de menu dans le Mot de l'Éditeur VB.
InformationsquelleAutor George | 2013-06-07
  1. 2

    Oui, il est très important de définir des références selon le tutoriel.

    Cependant, le changement de ces deux lignes:

    Dim objExcel As Excel.Application
Dim exWb As Excel.Workbook

    dans ceux-ci:

    Dim objExcel As Object
Set objExcel = CreateObject("Excel.Application")

    et le code devrait fonctionner, trop.

    • Cela fonctionne à merveille!!! Existe-il des explications à cela, ou c'est juste la façon dont il fonctionne?
    • Si vous ne pouvez pas définir des références en fonction de tutoriel (qui est appelé le "début de liaison"), vous pouvez le faire avec de la technique proposée par moi (ce qui est appelé la fin "de liaison"). Pour de plus amples informations, veuillez lire ceci
    InformationsquelleAutor Kazimierz Jawor