Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


23003 / 76732 ←次へ | 前へ→

【59100】ADODB.Connectionでプロジェクトエクスプローラにブックが残るとき
質問  ON  - 08/11/28(金) 14:21 -

引用なし
パスワード
   こんにちわ よろしくお願いします

下記で、
C:\Book1.xls
のシート一覧を取得しています


'参照設定:Microsoft ActiveX Data Objects 2.x Library
'    :Microsoft ADO Ext. 2.x for DDL and Security

Sub get_anth_bk_st_nm2()
   Dim cnnAdo As ADODB.Connection 'Microsoft ActiveX Data Objects 2.x Library
   Dim catAdo As ADOX.Catalog   'Microsoft ADO Ext. 2.x for DDL and Security
   Dim tdfAdo As ADOX.Table
   Set cnnAdo = New ADODB.Connection
   With cnnAdo
     .Provider = "Microsoft.Jet.OLEDB.4.0"
     .Properties("Extended Properties") = "Excel 8.0"
     .ConnectionString = "C:\Book1.xls"
   End With
   cnnAdo.Open
  
   Set catAdo = New ADOX.Catalog
   Let catAdo.ActiveConnection = cnnAdo
   For Each tdfAdo In catAdo.Tables
     Debug.Print tdfAdo.Name
   Next
   cnnAdo.Close
   Set catAdo = Nothing
   Set cnnAdo = Nothing
End Sub


このとき
C:\Book1.xls
が閉じた状態で実行する場合は問題ありませんが

C:\Book1.xlsを開いたまま実行し
その後、C:\Book1.xlsを閉じると
プロジェクトエクスプローラにVBAProject (Book1.xls)
が残ってしまいます

Q1どのようなコードにすれば、VBAProject (Book1.xls)が残らなくなりますか

Q2マクロブックado_test4xls.xlsを閉じると、タスクマネージャーのプロセスには
  エクセルはいなくなりますが、上記はいったいどういう状態なのでしょうか
  
アドバイスよろしくお願いいたします

0 hits

【59100】ADODB.Connectionでプロジェクトエクスプローラにブックが残るとき ON 08/11/28(金) 14:21 質問
【59103】Re:ADODB.Connectionでプロジェクトエクス... neptune 08/11/28(金) 16:14 発言
【59104】Re:ADODB.Connectionでプロジェクトエクス... ON 08/11/28(金) 16:31 発言
【59105】Re:ADODB.Connectionでプロジェクトエクス... Yuki 08/11/28(金) 16:49 発言
【59106】Re:ADODB.Connectionでプロジェクトエクス... ichinose 08/11/28(金) 17:39 発言
【59108】Re:ADODB.Connectionでプロジェクトエクス... ON 08/11/28(金) 18:32 お礼

23003 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free