Object Library. " Clique em " OK".
2 Digite o seguinte para criar uma nova sub-rotina : " Enter".
Private Sub importExcelData ()
Imprensa
3
Digite o seguinte para criar as suas variáveis :
Dim livro como pasta de trabalho
Dim dataInExcel as String
4
Digite o seguinte para abrir o livro do Excel :
Application.ScreenUpdating = False
Definir pasta de trabalho = Workbooks.Open ( "C: \\ Book1.xls ", True , True)
Editar "C: \\ Book1.xls " e digite o seu próprio caminho e pasta de trabalho nome
5
digite o seguinte para obter dados de "A1" na sua pasta de trabalho e adicioná-lo ao seu documento do Word: .
dataInExcel = Texto: = dataInExcel
6
Digite o seguinte para obter dados de "A2" na sua pasta de trabalho e adicioná-lo ao documento do Word :
dataInExcel = Texto: = dataInExcel
7
Digite o seguinte para fechar a pasta de trabalho e liberar as variáveis da memória :
workBook.Close Falso
Definir pasta de trabalho = Nothing
Application.ScreenUpdating = True