Excelファイル(Test.xls)の中のシート(sheet1)にあるセル(A3、B11等)
にある値を取得したい場合のSQL文の表記方法が、わかりません。何方か教えて頂けないでしょうか?
【サンプルプログラム】
Set objADO = CreateObject("ADODB.Connection")
objADO.Open "Driver={Microsoft Excel Driver (*.xls)};" & _
"DBQ=D:\Test.xls;" & _
"ReadOnly=1"
Set objRS = objADO.Execute("【?】")
すみませんが、よろしくお願い致します。
No.1ベストアンサー
- 回答日時:
Excel (ワタシの環境では 2003)
の中身をこんな感じにしておいて
| A | B
===================
1 | ID | Name
-------------------
2 | 1 | aaa
-------------------
3 | 2 | bbb
-------------------
4 | 3 | ccc
こういうような形であれば B3 セルの値をとることができます。
<%
' データソース
Const CONNECTION_STRING = "DRIVER=Microsoft Excel Driver (*.xls);DBQ=D:\ASP_TEST\Book1.xls"
' コネクションの作成
Dim adoCon
Set adoCon = Server.CreateObject("ADODB.Connection")
adoCon.Open CONNECTION_STRING
' SQL
Dim sql
sql = "SELECT NAME FROM [Sheet1$] WHERE ID = 2"
' レコードセットの作成
Dim rec
Set rec = Server.CreateObject("ADODB.Recordset")
rec.Open sql, adoCon
' Response.Write(rec.Fields.Item(0)) でも可能
Response.Write(rec.Fields.Item("NAME"))
Call rec.Close()
Call adoCon.Close()
Set rec = Nothing
Set adoCon = Nothing
%>
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Excel(エクセル) Excel VBAどこが間違ってますか? 4 2023/07/17 10:04
- Visual Basic(VBA) 貼り付けた値が消えていく 以下はソースファイルの2番目のシートのB6から最終行を取得 ターゲットファ 2 2023/07/27 12:23
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/03/28 14:52
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/03/07 14:05
- Visual Basic(VBA) VBAでファイルを開くプログラムがエラーです 2 2023/02/21 16:56
- Visual Basic(VBA) マクロVBA 1シートをまとめる 閉じ方 初心者 SOS! 1 2022/06/17 14:54
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/11 12:55
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ExcelVBAを使って、値...
-
特定のセルが空白だったら、そ...
-
【Excel VBA】指定行以降をクリ...
-
i=cells(Rows.Count, 1)とi=cel...
-
DataGridViewの各セル幅を自由...
-
【Excel】指定したセルの名前で...
-
Excelで指定した日付から過去の...
-
EXCELで変数をペーストしたい
-
Excel vbaで特定の文字以外が入...
-
Sub 要具ライフ() ActiveSheet....
-
Excel VBA、 別ブックの最終行...
-
【EXCEL VBA】Range("A:A").Fi...
-
特定の文字を条件に行挿入とそ...
-
指定文字以外のカウント
-
VBA実行後に元のセルに戻りたい
-
連続する複数のセル値がすべて0...
-
VBAでセルに値が入ったときにイ...
-
Word版VBで表の任意の箇所を...
-
screenupdatingが機能しなくて...
-
Excelのハイパーリンクにマクロ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelVBAを使って、値...
-
特定のセルが空白だったら、そ...
-
i=cells(Rows.Count, 1)とi=cel...
-
【Excel VBA】指定行以降をクリ...
-
Excelで指定した日付から過去の...
-
【Excel】指定したセルの名前で...
-
Excel vbaで特定の文字以外が入...
-
特定の文字を条件に行挿入とそ...
-
TODAY()で設定したセルの日付...
-
screenupdatingが機能しなくて...
-
Excelのプルダウンで2列分の情...
-
EXCELで変数をペーストしたい
-
連続する複数のセル値がすべて0...
-
Excel VBA、 別ブックの最終行...
-
VBAを使用した時間管理
-
エクセルVBAでコピーして順...
-
セル色なしの行一括削除
-
【EXCEL VBA】Range("A:A").Fi...
-
VBA コピーして次の値まで貼り...
-
VBA初心者です。結合セルを保持...
おすすめ情報