私は次のパスを使用してExcel 2015にODBCデータに引っ張っている: Excelのタブ「データ」>「他のソースからの」>「のMicrosoftクエリから」>私のデータソースを選択>テーブルを検索し、クエリExcelでODBCを使用して、パラメータを使用してデータをプルします。手作業で読み込むのではなく、セル参照でコードを記述する方法はありますか?
を作成クエリは "?"以下に示す「パラメータ」オプションを引き出す。 Parameter Pop Up Window
ここは私のODBCコードです。セル "= Sheet1!$ E $ 4"を参照する方法はありますか?ポップアップがこの情報を要求しないようにしますか?
`With ActiveSheet.ListObjects.Add(SourceType:=0, Source:= _
"ODBC;DSN=####;UID=######;;MODE=SHARE;DBALIAS=####;",
Destination:=Range(_
"$A$1")).QueryTable
.CommandText = Array(_
"SELECT PHPRTT.PHP_PART_NO, PHPRTT.PHPRTT_UPD_TS" & Chr(13) & "" &
Chr(10) & "FROM PHPRTT" & Chr(13) & "" & Chr(10) & "WHERE
(PHPRTT.PHPRTT_UPD_TS>=?)")
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.ListObject.DisplayName = "Table_Query1"
.Refresh BackgroundQuery:=False
End With`
注:わかりやすくするため、 'Chr(13)&" "&Chr(10)'を 'vbcrlf'に置き換えてください。 – jsotola
ありがとう、あなたはjsotola!それは素晴らしい仕事でした。 –