Slik importerer Excel-data til Word ved hjelp av Visual Basic

I programmerings verden er det nyttig å vite hvordan du importerer Microsoft Office Excel-data til et Microsoft Office Word-dokument for shareability. Word er et tekstbehandlingsprogram inkludert i Office-pakken. Excel er et regnearkprogram også en del av Office-pakken. Visual Basic for Applications (VBA) er et programmeringsspråk som brukes til å automatisere rutineoppgaver i Microsoft Office-programmer. Bruk VBA til å automatisere manuelle prosessen med å importere Excel-regneark til Word-dokumenter.

Bruksanvisning

1 Start Microsoft Office Word, velg "Utvikler" fanen og klikk på «Visual Basic." Velg "Insert" -menyen og klikk på "Module".

Velg "Verktøy" -menyen og klikk "Referanser". Merk av i boksen ved siden av "Microsoft Excel <versjonsnummer> Object Library." Klikk på "OK".

2 Skriv inn følgende for å opprette en ny subrutine:

Private Sub importExcelData ()

Trykk enter."

3 Skriv inn følgende for å lage dine variabler:

Dim arbeidsbok som arbeidsbok

Dim dataInExcel As String

4 Skriv inn følgende for å åpne Excel-arbeidsbok:

Application.ScreenUpdating = False

Sett arbeidsbok = Workbooks.Open ( "C: \ Book1.xls", true, true)

Edit "C: \ Book1.xls" og skriv din egen vei og arbeidsbok navn.

5 Skriv inn følgende for å få "A1" data i arbeidsboken og legge den til Word-dokumentet:

dataInExcel = workBook.Worksheets ( "Ark1"). Range ( "A1"). Formula

Selection.TypeParagraph

Selection.TypeText Tekst: = dataInExcel

6 Skriv inn følgende for å få "A2" data i arbeidsboken og legge den til Word-dokumentet:

dataInExcel = workBook.Worksheets ( "Ark1"). Range ( "A2"). Formula

Selection.TypeParagraph

Selection.TypeText Tekst: = dataInExcel

7 Skriv inn følgende for å lukke arbeidsboken og slipp variabler fra minnet:

workBook.Close False

Sett arbeidsbok = Nothing

Application.ScreenUpdating = True