[[20080404163040]]　『Worksheet_SelectionChangeじゃ出来ないんですが』（どがんか）　ページの最後に飛ぶ

『Worksheet_SelectionChangeじゃ出来ないんですが』（どがんか）

 マクロのあるBOOKがＡとします。
 アクティブなマクロは入っていないBOOKがＢとします。（SHEET1）
 BOOKのＢのセルをクリックするなり、セルを移動すると、そのセルに
 値を書き込みたいのですが、Worksheet_SelectionChangeですと、BOOKのＡに
 書く事となり、処理できません。
 何か良い方法はありますか？

 マクロのあるＡというブックの
 Thisworkbookのモジュールに
 '===========================================================================
 Option Explicit
 Private WithEvents app As Application
 Private Sub app_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    If Sh Is Application.ActiveSheet Then
       Target.Value = "なんとか"
       End If
 End Sub
 Sub set_app()
    Set app = Application
 End Sub
 Sub reset_app()
    Set app = Nothing
 End Sub

 として、set_appを実行後に、Ｂブックにてセルを移動すると　上記の
 app_SheetSelectionChangeイベントプロシジャーが実行されます。
 これを使ったらいかがですか？

 ichinose@今週も終わった

 ichinoseさん有り難う御座いました。すごいですわ。（どがんか）

コメント返信：

[ 一覧(最新更新順) ]

[[20080404163040]] 『Worksheet_SelectionChangeじゃ出来ないんですが』（どがんか） ページの最後に飛ぶ

[[20080404163040]]　『Worksheet_SelectionChangeじゃ出来ないんですが』（どがんか）　ページの最後に飛ぶ