- ベストアンサー
ファイルオープン時、PERSONALでVBA実行
新規作成した、エクセルファイルに対し、ファイルオープン時、PERSONALでVBA実行したいのですが。 新しいファイルを開くと、パーソナルのThisWorkBookは、白紙になっています。 新しいファイルにに対しても、実行する方法はないでしょうか。 ご存知の方がおられましたら教えてください。 よろしくお願いいたします。
- hatokamome
- お礼率44% (246/554)
- Visual Basic
- 回答数2
- ありがとう数1
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
>新しいファイルを開くと、パーソナルのThisWorkBookは、白紙になっています。 そんなはずはないのですが。 PERSONAL.XLS ?に書きこんで、それが消えてしまうとことは、保存し忘れたのでしょうか? なにをしたいのかわかりませんが、 >新しいファイルにに対しても、実行する方法はないでしょうか。 それは、また別問題です。 PERSONAL.XLS に書きこんで、新しいファイルに実行するということは、新しいファイルのオブジェクトを取得する必要があります。 http://okwave.jp/qa/q6371499.html 質問番号:6371499 エクセル起動時、自動的にマクロを実行する 手前味噌かもしれませんが、ここの#4は参考になるかもしれません。
その他の回答 (1)
- end-u
- ベストアンサー率79% (496/625)
PERSONAL.XLSのThisWorkbookモジュールに以下記載。 Option Explicit Private WithEvents xlApp As Application Private Sub Workbook_BeforeClose(Cancel As Boolean) Set xlApp = Nothing End Sub Private Sub Workbook_Open() Set xlApp = Application End Sub Private Sub xlApp_NewWorkbook(ByVal Wb As Workbook) MsgBox "NewWorkbook" End Sub Private Sub xlApp_WorkbookOpen(ByVal Wb As Workbook) If Not Wb Is ThisWorkbook Then MsgBox "Open:" & Wb.Name End If End Sub PERSONAL.XLSを開いた時のWorkbook_Openイベントで Excel.Applicationそのものを変数にセットします。 WithEventsキーワードで、そのxlAppのイベントを利用できるようにして xlApp_WorkbookOpen、xlApp_NewWorkbookなどのApplication単位でのイベントを活用します。
関連するQ&A
- エクセルVBA実行時のエラー:DLLファイルが見つ
タイトル:エクセルVBA実行時のエラー:DLLファイルが見つかりません 質問させていただきます。どうぞよろしくお願いいたします。 環境:PC1~3の全てが、Excel2010、Win7になります。 初めてVBAから読み込むためのDLLファイルを作成いたしました。 PC1上で動作確認できている2つのファイル(Test4.dll(VC++2013にて作成)と それを呼び出すVBAのついたエクセルファイル)を、 PC2とPC3に移動し、VBAを実行しましたところ 何故かPC3でのみ下記エラーが発生いたします。 >実行時エラー'53' >ファイルが見つかりません。Test4.dll ・2つのファイルは同じフォルダ内で実行しております。 ・VBAのカレントパスは ChDrive Left(ThisWorkbook.Path, 1) ChDir ThisWorkbook.Path で変更しております。 試しにC:\Windows\System32と C:\Windows\SysWow64にも Test4.dllをコピペしてみましたが、同じエラーが出てまいります。 ・PC3のみ違うところを探してみましたが、思いつくのは下記くらいでございます。 1.VSが入っておりませんでした。(必要なのでしょうか??) 2.実行しているパスが違います。 PC1とPC2の実行パス: D:\Users\Administrator\Documents\VBA_TEST PC3の実行パス: D:\Documents\VBA_TEST もし何か原因として思いつかれる事がございましたらお教えいただけないでしょうか。 お詳しい方がいらっしゃいましたら何卒よろしくお願いいたします。
- ベストアンサー
- Visual Basic
- VBA ファイルオープン時の実行方法
ファイルオープン時の実行方法は有りますでしょうか。 また、個人用マクロで実行したいです。 ご存知の方がおられましたら教えてください。 よろしくお願いいたします。
- ベストアンサー
- Visual Basic
- javaからVBAを実行する方法を教えてください。
javaからVBAを実行する方法を教えてください。 POIを使っています。 VBAの実行方法がWEBを探しても見つかりません。 エクセルファイルを閉じたまま行いたいです。 ご存知の方がおられましたら教えてください。 よろしくお願いいたします。
- ベストアンサー
- Java
- 実行時エラー:ファイルがオープンできません
いつもお世話になってます。 VBで一覧を表示するプログラムを組んでいます。 その一覧をエクセルに出力するボタンも作成しています。 エクセル出力ボタンを押下した際、 「実行時エラー:ファイルがオープンできません」となります。 何が原因として考えられますか? ※因みに、この現象が起こるPCと起こらないPCがあります。
- 締切済み
- Visual Basic
- エクセルファイルを開いた時にVBAを自動実行させるには??
こんにちは。いつもお世話になっています。 エクセルで作ったファイルを開いた時に、VBAを自動実行させたいのですが、どうすれば良いのでしょうか? 自分なりに調べたのですが、メッセージボックスを出す方法しかわかりません・・・。 別にVBA名を入れてもさっぱりダメです。 どうぞよろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel,vbaにて実行時エラー71
Excel,vbaにて実行時エラー71 が表示されます。 USBメモリのExcelファイルに作成したのですが、 何が原因かわかりませんが、 エラー71が表示になります。 どのように手順にて治せばよろしいでしょうか? 宜しくお願いいたします。
- 締切済み
- オフィス系ソフト
- オープンできないexcelファイルからVBAを取り出せるか?
自宅でEXCEL2000でVBAを作成しました。FDで仕事場に持ち込むと EXCELオープン→マクロの有効→強制終了 になってしまいます。マクロを無効としても同じです。 このサイトの過去の質問で「開けないエクセルのデータを取り出すことができる」とありましたが、エクセルファイルに組み込んであるVBAのコードは取り出せることが可能なのでしょうか??よろしくお願いします。 ちなみにデータは外部参照やワードで開いて取り出すことができました。 OS:WIN95 B EXCEL:2000 (9.0.3821 SR-1)
- 締切済み
- オフィス系ソフト
- VBAでパスワード付きファイルを開く
Excel VBA で、他のファイルからデータを取得し、集計しています。 集計ファイル(VBA有)とデータファイルは、どちらも同じパスワード(例:XYZ)がかかっています。 Workbooks.Openの引数にPassword:="XYZ"と書けば開けるのですが、VBA中にパスワードを直接記入したくありません。(安全やパスワード変更した場合を考えて) thisworkbook.Passwordプロパティを取得しても"********"になってしまい、パスワードを取得できません。 良い方法はないでしょうか
- 締切済み
- その他(プログラミング・開発)
- Excel・VBA Openメソッド実行時にファイル名を取得出来ません。
いつもお世話になっております。 ネットワークコンピュータ上(共有フォルダにパスワードを設定済み)の Excelブックに対してWorkbooks.Open パス名 & ファイル名を実行すると 下記の実行時エラーが出てしまい開く事が出来ません。 パスワード無しの参照のみ共有にすれば開く事が出来るのですが Openメソッド実行時、または実行前に共有フォルダのパスワードをセットする 方法は無いでしょうか?自分が知る限りではExcelブックのパスワードの設定 はOpenメソッドのオプションに有るようなのですが共有フォルダに関しては 見つける事が出来ませんでした。 OS:Win98,95 Excel:97 ネットワークはTCP/IPを使用しています。 ご存知の方、どうか宜しくお願いします。 エラー内容 実行時エラー'1004': 'パス名\ファイル名.xls'が見つかりません。ファイル名および ファイルの保存場所が正しいかどうか確認して下さい。 [ファイル]メニューの最近使用したファイルの一覧からファイルを開こうとしている場合は、 そのファイルの名前が変更されていないこと、移動または削除されていないことを 確認して下さい。
- ベストアンサー
- オフィス系ソフト
- Excel VBA で、ファイルを開いた時、自動的にマクロが実行させる方法
Excel VBA で、ファイルを開いた時、自動的にマクロが実行させる方法を教えてください。 参考になる、URLでもかまいません。
- ベストアンサー
- オフィス系ソフト