Clever-Excel-Forum

Normale Version: VBA - Daten in vorhandenes ListObject mittel Query einlesen
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo zusammen,

ich lade Daten aus einer externen Datenbank, was auch funktioniert.
Die geladenen Daten werden in ein neu erzeugtes ListObject eingefügt, was ebenfalls funktioniert.



Code:
With Tabelle4.ListObjects.Add(SourceType:=0, Source:="OLEDB;Provider=Microsoft.Mashup.OleDb.1;Data Source=$Workbook$;Location=" & p & ";Extended Properties=""""" _
        , Destination:=Range("$B$5")).QueryTable
        .CommandType = xlCmdSql
        .CommandText = Array("SELECT * FROM [" & p & "]")
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = False
        .RefreshPeriod = 0
        .PreserveColumnInfo = True
        .Refresh BackgroundQuery:=False
    End With


Nun will ich nicht jedes mal ein ListObject via Add erzeugen, sondern ein vorhandenes ListObject nutzen.
Wie kann ich diese Daten in ein vorhandenes ListObject ("tblQuoteData") laden?


Danke und Gruß
Hallo,

ist doch ganz einfach:

Gruß
Marcus
Was ist das für eine Forum.xlsm-Datei mit Makro, das beim Aufruf der Datei automatisch startet und dann unkontrolliert Internetaktivitäten durchführt?

Das sieht ja richtig gefährlich aus.

Man kann einen Hinweis auf das Hochladen von Arbeitsmappen auch so geben:
https://www.clever-excel-forum.de/Thread...einstellen
https://www.clever-excel-forum.de/Thread...ng-stellen
Hallöchen,

da hätte sicher auch der Code ausgereicht.

Hier mal ein Link zu einem Lösungsansatz:

pasting-an-array-of-values-over-a-listobject-excel-table-destroys-the-listobje