Excel VBA質問箱 IV

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

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


63408 / 76732 ←次へ | 前へ→

【17920】アドインでのイベントプロシージャの扱いを教えてください
質問  mon  - 04/9/10(金) 14:04 -

引用なし
パスワード
   VBA入門書レベルの者です。
知りたい情報を探すことができず困っています。
どなたか教えていただけませんでしょうか。

標準モジュールで以下のマクロを作成し、動作することを確認しました。

Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

  MsgBox "test"
  
End Sub

このマクロを含むファイルをアドイン形式(xla)で保存し、そのアドインを組み込んでも動作しませんでした。

訳もわからず、いろいろなサイトに載っていたソースを参考にアドインを以下のように修正すると、アドインに組み込んだ時は動作しますが一旦ファイルを閉じて2回目以降は動作しません。

Private WithEvents myApp As Application

Private Sub Workbook_AddinInstall()

  Set myApp = Application
  
End Sub

Private Sub myApp_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

  MsgBox "test"
  
End Sub

なぜこうなるのでしょうか?

またこのようなことは何で調べればよいのでしょうか?(VBAのヘルプやインターネット、書籍等どこかにあるのだと思うのですが、私の能力では見つけられませんでした)

よろしくお願いいたします。

0 hits

【17920】アドインでのイベントプロシージャの扱いを教えてください mon 04/9/10(金) 14:04 質問
【17921】Re:アドインでのイベントプロシージャの扱... IROC 04/9/10(金) 14:09 回答
【17923】Re:アドインでのイベントプロシージャの扱... でれすけ 04/9/10(金) 14:24 回答
【17930】Re:アドインでのイベントプロシージャの扱... mon 04/9/10(金) 14:57 お礼
【17933】Re:アドインでのイベントプロシージャの扱... IROC 04/9/10(金) 16:02 回答
【17939】Re:アドインでのイベントプロシージャの扱... mon 04/9/10(金) 18:10 お礼
【17940】Re:アドインでのイベントプロシージャの扱... IROC 04/9/10(金) 18:23 回答
【17958】Re:アドインでのイベントプロシージャの扱... mon 04/9/11(土) 1:04 質問
【17959】Re:アドインでのイベントプロシージャの扱... IROC 04/9/11(土) 2:06 回答
【17965】Re:アドインでのイベントプロシージャの扱... mon 04/9/11(土) 11:47 お礼
【17925】アドインでのイベントプロシージャの扱いを... mon 04/9/10(金) 14:29 質問
【17926】Re:アドインでのイベントプロシージャの扱... IROC 04/9/10(金) 14:35 回答
【17927】Re:アドインでのイベントプロシージャの扱... mon 04/9/10(金) 14:48 質問
【17931】Re:アドインでのイベントプロシージャの扱... mon 04/9/10(金) 15:19 お礼

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