Pivot auf Access
windalf
wenn ich mir in Excel einen Pivot auf Access "zusammenklicke" funktioniert das. Zeichne ich das mit dem Markorekorder auf und führe dann das Marko auf wird zwar der Pivot erstellt, allerdings werden keine Daten geladen (nur die Überschriften existieren die ich dann zwar in den Pivot reinziehen kann aber ohne Daten ist das verlgeichsweise witzlos)... Erstelle ich per Makro nen Pivot auf ne Exceltabelle funktioniert das problemlos
With ActiveWorkbook.PivotCaches.Add(SourceType:=xlExternal)
.Connection = Array(Array( _
"ODBC;DSN=Microsoft Access-Datenbank;DBQ=D:\test\test.mdb;DefaultDir=D:\test;DriverId=25;FIL" _
), Array("=MS Access;MaxBufferSize=2048;PageTimeout=5;"))
.CommandType = xlCmdSql
.CommandText = Array( _
"SELECT Gesamt.MN, Gesamt.Standardpreis, Gesamt.Kurztext, Gesamt.MG, Gesamt.WGR, Gesamt.ME, Gesamt.Z_EKGR, Gesamt.Jahr" & Chr(13) & "" & Chr(10) & "FROM `D:\test\`.Gesamt Gesamt" _
)
.CreatePivotTable TableDestination:= _
"'[Template-Excel-v3.5.xls]Tabelle2'!R3C1", tablename:="PivotTable1", DefaultVersion:=xlPivotTableVersion10
End With
Was muss ich tun um den Pivot zu überzeugen auch die Daten noch zu laden
PS: Auch wenn ich über den PivotTableAssistent dann noch versuche das ganze zu kitten zeigt der mir zwar die Verbindung zur Datenbank inkl der selektierten Spalten an aber Daten sind in den so erstellten Pivot nicht mehr zu bekommen.
Hat jemand ne Idee?