| 
    
     |  | ▼てと さん: こんにちは。
 >他のBOOKからコピーしたシートに、特定のイベントプロシージャーを設定したいのですが、そんなことが出来るのでしょうか?
 >
 >例えば、Sheet111が他のBookからコピーされたものとして、以下のようなコーディングをシートモジュールに設定したいと考えています。
 >'Sheet111
 >Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 >  If Target.Address = "$A$1" Then
 >    Call 処理
 >  End If
 >End Sub
 >
 >'標準モジュール
 >Sub 処理()
 >  MsgBox "A1セルが選択されました。"
 >End Sub
 これ、Thisworkbookのイベントではどうでしょうか?
 Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
 if sh.name="Sheet111" then
 >   If Target.Address = "$A$1" Then
 >    Call 処理
 >    End If
 end if
 End Sub
 
 |  |