Excel VBA質問箱 IV

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

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


41087 / 76732 ←次へ | 前へ→

【40729】Re:Formが開いている間に別のシートが選...
お礼  リョウタ  - 06/7/21(金) 16:08 -

引用なし
パスワード
   ハトさん、ご返事どうも有難うございました。

xla の ThisWorkbook のコードエリアにコードを入力して、全てのワークシート上でイベントを発生させてしまうのはさすがに問題があると気付きましたので、お教えいただいたコードを
------------------------------------------------------
Private WithEvents myApp As Application

Private Sub myApp_SheetActivate(ByVal Sh As Object)

  MsgBox Sh.Name
 
End Sub

Private Sub UserForm_Initialize()
 
  ...
  ...
  Set myApp = Application
 
End Sub
------------------------------------------------------
のように UserForm のコードエリアに入力すれば、自分の思惑通りに機能させることができました!!どうも有難うございました。これで、myApp_SheetActivate 内に UserForm_Initialize で呼び出しているいくつかの Function を実行すれば、シートが選択されるたびにアクティブシート上の必要なデータを Form に反映させられます!!

長い間保留にしていたので、とても助かりました。
また何かご質問させていただくことがあるかと思いますが、その時はまたよろしくお願い致します。

リョウタ

0 hits

【40686】Formが開いている間に別のシートが選択さ... リョウタ 06/7/20(木) 13:58 質問
【40691】Re:Formが開いている間に別のシートが選択... ハト 06/7/20(木) 14:42 回答
【40693】Re:Formが開いている間に別のシートが選... リョウタ 06/7/20(木) 15:29 質問
【40701】Re:Formが開いている間に別のシートが選... ハト 06/7/20(木) 16:48 回答
【40729】Re:Formが開いている間に別のシートが選... リョウタ 06/7/21(金) 16:08 お礼
【40695】Re:Formが開いている間に別のシートが選択... Kein 06/7/20(木) 15:36 回答
【40696】Re:Formが開いている間に別のシートが選... リョウタ 06/7/20(木) 16:06 回答
【40698】Re:Formが開いている間に別のシートが選... Kein 06/7/20(木) 16:34 発言
【40730】Re:Formが開いている間に別のシートが選... リョウタ 06/7/21(金) 16:19 お礼

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