Hey Community,
habe ein riesiges Problem und das lautet wie folgt:
Habe in Word eine Interaktion geschrieben, in der der Benutzer beliebig viele Excel dateien einfügen kann. Ich meine zu hoffen das ich eingestellt habe, das nur der benutzte bereich der zellen kopiert und eingefügt wird. Um dies zu testen, habe ich angegeben, dass am ende des dokumentes end of documents stehen soll.
Dadurch habe ich gesehen, dass leider viel mehr als nur die vollen zellen kopiert worden sind und ich somit nicht die daten untereinander bekomme.
Könnte mir Bitte jemand damit helfen und mir sagen ob ich im folgenden code iwas falsch gemacht habe.
Set AppExcel = Excel.Application
Set wbkExcel = AppExcel.Workbooks.Open(AuswahlDatei)
Set wksExcel = wbkExcel.Worksheets("Pruefungen")
Set rngExcel = wksExcel.UsedRange
Range(rngExcel.AddressLocal).Copy
ActiveDocument.Bookmarks("TextmarkeAllePruefungen").Range.Paste
ActiveDocument.Content.InsertAfter "end of document"
|