
アドインに登録し、不特定のCSVファイルを読み込んだとき(OPENしたとき)に内容を判別し、起動するマクロを作成しようとしています。
標準モジュールに”Sub Auto_Open()”により記述し、アドイン登録しましたが、期待する動作となりません。
-----------------------------
Sub Auto_Open()
MsgBox "ファイルが開く毎に起動させたい"
End Sub
-----------------------------
☆EXCEL未起動→ファイルオープンしたときには、上記MsgBoxが表示されるが、EXCEL起動中→ファイルオープンでは表示されません。
ファイルを開くたびに動作するマクロを登録するためには、どのようなテクニックが必要なのでしょうか?
No.2ベストアンサー
- 回答日時:
こんにちは。
そのアドインBookの
'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_WorkbookOpen(ByVal Wb As Workbook)
If Not Wb Is Me Then MsgBox "open"
End Sub
アドイン自身のOpen時にもメッセージが必要なら
If Not Wb Is Me Then
は不要です。
ありがとうございました。
参考にしてチャレンジしてみましたが、
エラーになり起動しませんでした。
私が使っているバージョン(Office97)が古いからでしょうか?
他の方法を検討します。
No.1
- 回答日時:
> EXCEL起動中→ファイルオープンでは表示されません。
新しく開かれたファイル=アクティブ(表面に表示)になる。
起動中のEXCELファイル=背面に隠れた状態になる。
というのでしたら、
起動中のファイルの ThisWorkbookモジュールに
'
Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
MsgBox "新しいファイルが開かれました"
End Sub
'
ではいかがでしょうか。
ご回答ありがとうございました。ただ、
「アドインで登録し、不特定のファイルを開いたとき」
の条件での動作が条件となるため、参考とさせていただきますが
今回の内容に合致しません。他の方法を検討してみます。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
system.mdwを見つけることが出...
-
jspのエラーが修正できません。
-
VB6.0 Shellによる終了監視に...
-
VB5が起動しない
-
ブラウザからexeファイルを起動...
-
html上で、バッチやexeファイル...
-
別のAccessファイルのフォーム...
-
Eclipseで、プロジェクト名のと...
-
Eclipse・プロジェクトで、フォ...
-
正しいURL指定しているにもかか...
-
Eclipseで実行できてコマンドプ...
-
JAVA(またはTOMCAT)でのスケ...
-
プログラム実行の際に、「ソー...
-
ACCESSでタイトルバーを非表示...
-
Java 2 SDK,SEのダウンロードの...
-
javaクラスファイルをEclipseで...
-
Tera Term ネットワークに到達...
-
jarファイルをバッチで実行させ...
-
インフォシークのプロフィール...
-
javaが文字コードの影響でコン...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
html上で、バッチやexeファイル...
-
system.mdwを見つけることが出...
-
jspのエラーが修正できません。
-
*.asp の拡張子名がついたht...
-
Access VBAよりシート名を取得...
-
GUIアプリをコマンドラインで使...
-
EXE間で同期をとりながらデータ...
-
VBAで作成したマクロをデスクト...
-
VBA Application visibleの...
-
EXCELバッチコマンド起動...
-
exeファイルが実行中かどうか、...
-
別のAccessファイルのフォーム...
-
内部プログラムエラーになりました
-
量子化学計算ソフト GAMESS の...
-
HTMLでサーバーに・・・
-
PC 遅いと感じています。
-
サーブレット
-
VB2008によるOCX作成、またはHT...
-
VB5が起動しない
-
文をクリックすれば音が出るよ...
おすすめ情報