Hallo
Ich möchte in meinem unten aufgelisteten Makro eine SQL-Abfrage gestalten, die eine Variable Spalte (in diesem Fall DUMMY) zulässt.
Wenn der Spaltenname im Excel-Sheet z.B.: in Zelle B10 steht, wie müsste dann die korrekte Select-Abfrage lauten?
Irgendwas mit SELECT DUAL.$B$10 … Aber bei mir hat es nicht funktioniert.?
Vielen Dank
Mit freundlichen Grüßen
Willi
Sub Makro1()
’
’ Makro1 Makro
’ Makro am 03.01.2003 von azi aufgezeichnet
’
’
With ActiveSheet.QueryTables.Add(Connection:= _
„ODBC;DSN=test;UID=SYSTEM;DBQ=BEQ-LOCAL;ASY=OFF;“, _
Destination:=Range(„A1“))
.CommandText = Array(„SELECT DUAL.DUMMY FROM SYS.DUAL DUAL“)
.Name = „Abfrage von test“
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = True
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.Refresh BackgroundQuery:=False
End With
End Sub