ich versuche über den ug Codeabschnitte aus einer Tabelle Daten in ein Listobject einzufügen:
Leider erscheint mir bei dem fettgedruckten abschnitt ein Fehler.
Kann mir evtl. jemand weiterhelfen.
lg Christian
Set wbQuelle = Workbooks.Open(Filename:=Dateiauswahl)
' Daten kopieren und einfügen
wbQuelle.Worksheets(1).Range("A1").CurrentRegion.Copy
ThisWorkbook.Worksheets("KD_ANALYSE").Range("E13").PasteSpecial Paste:=xlValues
' Arbeitsmappe schließen
wbQuelle.Close SaveChanges:=False