EXCELに接続 DAOで

質問

VB6を使っています。データベースにEXCELを使用します。
EXCELに接続するところがまったくわからないので教えてください。
よろしくお願いします。

回答No.1

maruru01 · ベストアンサー

こんにちは。maruru01です。

題のDAOの意味がわかりませんが、エクセルオブジェクトを使用してシートとかセルを操作するということでよいでしょうか。

まず、コード画面のメニューの[プロジェクト]→[参照設定]で、
「Microsoft Excel X.X Object Library」（X.Xはバージョン）
にチェックを入れてOKします。
これでエクセルオブジェクトが使用可になったので、以下のように書きます。

Dim xlApp As Excel.Application　'Excelアプリケーションオブジェクト
Dim xlBook As WorkBook　'Workbookオブジェクト
Dim xlSheet As WorkSheet　'Worksheetオブジェクト

'アプリケーションの参照
Set xlApp = CreateObject("Excel.Application")
'ブックの参照
Set xlBook = xlApp.Workbooks.Open("エクセルファイルのフルパス")
'シートの参照
Set xlSheet = xlBook.Worksheets(シート名)

ここにそのシート内での操作を記述（ExcelVBAの要領）
例）セルA1に値（"Test"）を代入
xlSheet.Range("A1") = "Test"

'シートの参照破棄
Set xlSheet = Nothing
'ブックを保存して閉じて、参照破棄
xlBook.Close True
Set xlBook = Nothing
’アプリケーションを終了して、参照破棄
xlApp.Quit
Set xlApp = Nothing

回答No.3

TAGOSAKU7

トップページにリンクを張りましたが、タイトルを見ていってください。
Excelへのリンクテーブルの作成方法が、参考になると思います。
ちなみにExcel2000は未検証だけど
Excel 8.0→Excel 9.0
だと思います。

参考URL：

http://homepage2.nifty.com/inform/vbdb/

回答No.2

a-kuma

DAO を使ったアクセスですね。参考URL のページにサンプルがあります。

参考URL：

http://homepage2.nifty.com/housaka/excel/vbafaq11.html