- 締切済み
AccessからExcel内のマクロ無効について
いつもお世話になっております 以下の内容についてご存知の方、ご教授お願い致します win2000 office2000 マクロを含むExcelファイル内のデータをマクロを無効にし アクセスから取り込むという処理を行いたいのですが、何故か マクロが無効になりません。WinXP、Office2000の環境ですと マクロを実行せず走るのですがwin2000だとダメです win2000だとマクロを無効には出来ないのでしょうか? Dim objMyxl As Object Dim wbk As Excel.Application Dim vrtA As Variant Dim intCnt As Integer On Error GoTo err Set objMyxl = CreateObject("Excel.Application") objMyxl.EnableEvents = False objMyxl.Workbooks.Open Filename:="C:\test\Makuro.xls" ←マクロが走る vrtA = objMyxl.worksheets(1).Range("A1").CurrentRegion.Value objMyxl.Workbooks.Close objMyxl.Quit objMyxl.EnableEvents = True ちなみに、Excelのマクロ側はこの様な感じでテストしてます Private Sub Workbook_Open() MsgBox "open" End Sub
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- kmetu
- ベストアンサー率41% (562/1346)
参考までに VBSでExcelのWorkbook_Openイベントを発生させないようにするには? http://www.happy2-island.com/bbs/bbs.cgi?mode=past&no=629
お礼
返信遅くなりました アドバイスありがとうございます VBSではなく、Win2000の環境でもExcelからだとマクロの無効が 出来たので、面倒ではありますがAccess→Excelで起動するように しました。 アドバイスから勉強させて頂いて解決にたどり着けました ありがとうございました。