Object Library . " Klicken Sie auf " OK".
2 Geben Sie den folgenden , um eine neue Subroutine erstellen : " . Geben Sie "
Private Sub importExcelData ()
Presse
3
Geben Sie den folgenden Ihre Variablen zu erstellen :
Dim Arbeitsmappe als Arbeitsmappe
Dim dataInExcel As String
4
Geben Sie den folgenden
Application.ScreenUpdating = False
Set Arbeitsmappe = Workbooks.Open ("C : \\ Book1.xls ", True , True)
Bearbeiten, um Ihre Excel- Arbeitsmappe öffnen "C: \\ Book1.xls " und geben Sie Ihren eigenen Weg und Namen der Arbeitsmappe
5
Geben Sie den folgenden auf "A1" Daten in der Arbeitsmappe erhalten und fügen Sie ihn in Ihr Word-Dokument : .
dataInExcel = Text: = dataInExcel
6
Geben Sie den folgenden auf "A2" Daten in der Arbeitsmappe erhalten und fügen Sie ihn in Ihr Word-Dokument :
dataInExcel = Text: = dataInExcel
7
Geben Sie den folgenden zu Ihrer Arbeitsmappe und Release- Variablen aus dem Speicher zu schließen :
workBook.Close Falsch
Set Arbeitsmappe = Nothing
Application.ScreenUpdating = True