【Excel/VBA】イベントプロシージャから標準モジュールの呼び出し方法について シート1：値

9:3600【Excel/VBA】イベントプロシージャから標準モジュールの呼び出し方法について シート1：値が変更されたらmsgboxで通知を出すイベントプロシージャ【Excel/VBA】イベントプロシージャから標準モジュールの呼び出し方法について シート1：値が変更されたらmsgboxで通知を出すイベントプロシージャ シート2：通知の際に音の有無を設定するシート 以下コードです。。

▼シート1ーーーーーーーーーーーーーーーーーーーーーーーー Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Dim i As Integer 'A列以外のセルの値が変更されたときに処理を実行 If Not Intersect(Target, Range("A:A")) Is Nothing Then Else MsgBox "追加がありま。。

" End If End Sub ▼シート2ーーーーーーーーーーーーーーーーーーーーーーーー Sub sound() Dim 音の有無 As String, 回数 As Long With Workbooks("test202502.xlsm").Worksheet("音の設定") 音の有無 = .Range("C2") 音の回数 = .Range("C4") If 音の有無 = "鳴らす" Then For i = 1 To 音の回数 Beep Application.Wait Now + TimeValue("0:00:01") Next i End If End With End Sub ーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 直接ifを入れると問題なく音が鳴りますが、シート（2）で設定できるようにいです。。

Callステートメントで呼び出すと「引数の指定が必要」と出てしまいます…涙 超初心者ですので、分かりやすく教えていただけると助かります。。

よろしくお願い致します！Visual Basic | Excel