Aloha zusammen!
Nach stundenlangen Rumgesuche und Probiere suche ich hier nach Erleuchtung. Ich würde gerne direkt mit einem Makro in Excel ein Chart erzeugen, welches als Source ein Querytable/SQL Statemant verwendet. Eine Datenabfrage hab ich schon hingekriegt:
Sub Makro()
Dim sourcerange1 As Range
With ActiveSheet.ListObjects.Add(SourceType:=0, Source:="ODBC;DRIVER={Microsoft ODBC for Oracle};UID=blubb;PWD=blubb;SERVER=blubb;", Destination:=Range("$H$1")).QueryTable
.CommandText = "select blubb"
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.EnableRefresh = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.ListObject.DisplayName = "Tabelle_Abfrage_von_Iset3"
.Refresh BackgroundQuery:=False
End With
End Sub
Geht das überhaupt? wie muss das aussehen?
Vielen Dank für die zahlreichen Antworten ( hoffentlich werden es ein paar)
PS: eine weitere Frage aus reiner Neugier: wie kriegt man es hin dass die abgefragten Daten aktualisiert und nicht erneuert werden? Sobald ich das obige Marko ausführe meckert er so in der Art "Kann Pivot-Tabelle nicht überschreiben"
|