Comment importer des données Excel pour mot à l'aide de Visual Basic

Instructions

1. Démarrez Microsoft Office Word, sélectionnez le "Développeur" puis cliquez sur l'onglet "Visual Basic." Sélectionnez le "Insérer" Menu et cliquez sur "Module."

   Sélectionnez le "Outils" Menu et cliquez sur "Références." Cochez la case à côté de "Microsoft Excel Bibliothèque d'objets." Cliquez "D'ACCORD."

2. Tapez la commande suivante pour créer un nouveau sous-programme:

   Private Sub importExcelData ()

   Appuyez "Entrez."

3. Tapez la commande suivante pour créer vos variables:

   Dim classeur en tant que classeur

   
   
   
   

   Dim dataInExcel As String

4. Tapez la commande suivante pour ouvrir votre classeur Excel:

   Application.ScreenUpdating = False

   Réglez classeur = Workbooks.Open ("C: Book1.xls", Vrai vrai)

   Modifier "C: Book1.xls" et tapez votre propre chemin et classeur nom.

5. 
   
   
   
   

   Tapez la commande suivante pour obtenir "A1" données dans votre classeur et l'ajouter à votre document Word:

   dataInExcel = workBook.Worksheets ("Sheet1").Gamme("A1") .Formula

   Selection.TypeParagraph

   Selection.TypeText texte: = dataInExcel

6. Tapez la commande suivante pour obtenir "A2" données dans votre classeur et l'ajouter à votre document Word:

   dataInExcel = workBook.Worksheets ("Sheet1").Gamme("A2") .Formula

   Selection.TypeParagraph

   Selection.TypeText texte: = dataInExcel

7. Tapez la commande suivante à fermer votre classeur et de libérer de la mémoire de variables:

   workBook.Close Faux

   Réglez classeur = Nothing

   Application.ScreenUpdating = True