importere Excel data til Word

Selvfølgelig, men det kræver noget programmering. Ligger alle ordre i samme Excel- fil?

Ordrerne er gemt i hver sin excel fil med hver sit ordrenummer.

Så er det bare at lave noget kode, der åbner den rigtige fil og henter oplysninger fra celler i Excel ind i bogmærker i Word.

nemli´ja....

Men hvor starter jeg? Har du nogle tricks på lager?

jep - er lige i gang med et eksempel

'Husk at sætte referancen til Excel via Tools/References Microsoft Excel X.X Object Library
Sub IndsætFraExcel()

Dim xlApp As Excel.Application
Dim svar as Integer

'Opretter Excelobjektet xlApp
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True

'Her indtastes ordrenummeret
svar = InputBox("Indtast ordrenummer", "Hent oplysningere")

'Excelregnearket med åbnes
xlApp.workbooks.Open FileName:="C:\\" & svar & ".xls"

'Henter data fra Excel over i bogmærke i Word
ActiveDocument.Bookmarks("sagsnummer").Range.Text = xlApp.Range(a1).Value

xlApp.Quit
Set xlApp = Nothing

End Sub

tak, tak. Nu er jeg ikke superbruger i hverken det ene eller det andet officeprg. Så derfor er jeg nødt til at vide: Hvor skal jeg helt præcist indsætte koden som du har lavet? i Word?

Åben Word
Optag en makro, der f.eks. skriver noget tekst
Funktioner/Makro Indspil ny makro
Tryk Alt+F8
Find din makro og tryk Rediger

Nu er du i makromiljøet

Din makro starter med "Sub" OgSåDetDuHArKaldtDen()
og ender med "End Sub"

Slet din makro og kopier min makro ind i stedet for

Stadig i makromiljøet vælger du "Tools/References" og finder "Microsoft Excel X.X Object Library" på listen og sætter flueben i den.

Nu kan du lukke makromiljøet

Indsæt et bogmærke i Word, der hedder "Ordrenummer" og opret en Éxcelfil, hvor ordrenummeret er filnavnet, samtidigt med at ordrenummeeret står i celle A1.

I Word vælger du nu Alt+F8, vælger min makro og trykker kør

En lille fejl havde indsneget sig i mit indlæg :-)

Indsæt et bogmærke i Word, der hedder "sagsnummer" og opret en Éxcelfil, hvor ordrenummeret er filnavnet, samtidigt med at ordrenummeeret står i celle A1.

Så langt, så godt!

Jeg har oprettet en Excel-fil og en makro i word, samtidigt har jeg indsat et bogmærke i word.
Men nu får jeg en fejlmeddelse der peger på denne linie i makroen: ActiveDocument.Bookmarks("ordrenummer").Range.Text = xlApp.Range(a1).Value

Havde lige glemt: "" omkring a1 - her er en linie der virker - har lige testet den :-)
ActiveDocument.Bookmarks("ordrenummer").Range.Text = xlApp.Range("a1").Value