Herbers Excel-Forum - das Archiv

abfrage datenquellen

Bild

Betrifft: abfrage datenquellen
von: arne

Geschrieben am: 15.02.2005 13:32:12
hallo forum,
weiss jemand, ob die Möglichkeit besteht mehrere Abfragen für eine Pivot zu kombinieren? Also z.b. so, wenn es denn funktionieren wuerde:
QueryString = "Exec Testabfrage1 Exec Testabfrage2"
With PivotCache
...
...
end with
Set Pivot = PivotCache.CreateTable
...
...

er gibt mit zwar keine Fehlermeldung aber die gewünschten Daten auch nicht.
Vorschläge????
danke und gruß
arne
Bild

Betrifft: AW: abfrage datenquellen
von: arne

Geschrieben am: 15.02.2005 13:49:38
ich habe gerade gesehen, das es so ähnlich gehen müsste:
' Pivot Cache erstellen
Set PTCache = ActiveWorkbook.PivotCaches.Add _
(SourceType:=xlExternal)

' Datenbank kontaktieren und query durchführen

' ConnectString = ConnectServer
QueryString = "EXEC TestAbfrage1 EXEC TestAbfrage2"

With PTCache
.Connection = ConnectString
.CommandText = QueryString
End With


' Set PT = PTCache.CreatePivotTable _
' (TableDestination:=Sheets("Pivot").Range("A1"), _
' TableName:="Pivot1")

'''''' Hier muesste es irgendwie verwurstet werden ????? '''''''''''''
ActiveWorkbook.PivotCaches.Add(SourceType:=xlConsolidation, SourceData:= _
Array("xxxxxxx", "xxxxxxx")).CreatePivotTable _
TableDestination:="", TableName:="PivotTable1"

hat jemand eine idee???
 Bild
Excel-Beispiele zum Thema "abfrage datenquellen"
Unterdrückung von Sicherheitsabfragen Arbeitsmappe-Schließen-Abfrage abfangen
Name der aufrufenden Schaltfläche abfragen Abfrage der markierten Spalten
Anzahl der einzufügenden Zeilen abfragen Programmabbruch bei Überspeichernabfrage verhindern
Abfrage, ob ein Menü in einer Menüleiste vorhanden ist Web-Abfrage ohne *.iqy-Datei
Web-Aktienkursabfrage bei YAHOO Start- und Enddatum abfragen und markieren