掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
テーブルに保存したOLEオブジェクト型のExcelファイルのオープン (ID：75883)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
７／８に続き2回目の質問です。 今回は、テーブルに保存したOLEオブジェクト型のExcelファイルのオープン方法 について、わかる方がいらっしゃいましたらご教授願います。 １．テーブル定義 Accessのテーブルを以下の様に定義しています。 １）テーブル名：テーブル１ ２）id(オートナンバー型) ３）Excel_file(OLEオブジェクト型) ２．やりたいこと コマンドボタン押下後に、テーブル上のExcel_fileをオープンする ３．現状のコード Public Sub Command1_Click() Dim cnn1 As New ADODB.Connection 'コネクション Dim rst As New ADODB.Recordset 'レコードセット Dim strCnn As String '接続文字列 '接続文字列 strCnn = "Provider=Microsoft.Jet.OLEDB.4.0; " strCnn = strCnn & "Data Source=E:\Flets\Excelファイル表示.mdb" '接続の確立 cnn1.Open strCnn ' テーブル１のオープン rst.Open "テーブル１", cnn1, adOpenKeyset, adLockPessimistic '★★★わからないところ★★★★★★★★★★★★★★★★★★★★★★ 'テーブル内のExcel_fileフィールドに格納されているOLEオブジェクト '型のExcelファイルをオープンする '最終レコードまでの繰り返し Do Until rst.EOF Loop '★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★ 'オブジェクトの開放 Set rst = Nothing Set cnn1 = Nothing 'レコードセット、接続のクローズ rst.Close cnn1.Close End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.