エクセルVBA イベントプロシージャに引数を渡せま
お世話になります。
エクセル２００３／XP 使用です。
イベントプロシージャに引数を渡せまるかどうか教えていただけますでしょうか？
下記のコード中の変数mysheetnameを
ユーザーフォーム、→ CommandButton１のプロシージャに
引数として渡して行きたいのですが、
実行すると、一番最初のWorkbook_SheetBeforeRightClickの時点で、
コンパイルエラー：
プロシージャの宣言が、イベントまたはプロシージャの定義と一致していません。
とエラー表示されます。
イベントプロシージャに引数を渡すことはできますでしょうか？
----------
ThisWorkBook内
----------
Public mysheetname As String
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
mysheetname = ActiveSheet.Name
UserForm1.Show (mysheetname) '←変数mysheetnameの値をユーザーフォームに渡したい。
End Sub
----------
ユーザーフォーム
----------
Private Sub UserForm_Initialize(ByVal mysheetname As String )
処理
End Sub
Private Sub CommandButton1_Click(ByVal mysheetname As String )
処理
End Sub
’--------- ここまで
引数について少し理解し始めたばかりの者です。
よろしくお願いします。
