【マクロ】モジュール変数の記述時、Callにて、呼び出されたプロシージャから実行するとエラーとなる？

Q1標題の件、以下コード❶より実効すると、エラーとなります
モジュール変数の場合は、呼び出し側から実行しないといけないルールですか？？？

【Callステートメントにて呼び出されたコード❶】
Sub あいうえお()

ws1.Cells(1, 1) = "あいうえお"

End Sub



Q2以下の共通コードを、１回だけしか書かないで、例えば５つのCallで呼び出す
プロシージャで、共同利用する為には、値渡しが有効ですか？？？
下記の例は、Callが１つしかありません。しかし、実際は５つ位を予定しています


【共通コード】
Dim filpath1 As String

Dim wb1 As Workbook

Dim ws1 As Worksheet

filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(141, 1)

Set wb1 = Workbooks.Open(filepath1)

Set ws1 = wb1.Worksheets("Sheet1")




【コード】
Dim filpath1 As String

Dim wb1 As Workbook

Dim ws1 As Worksheet
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
Sub モジュール変数()


filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(141, 1)

Set wb1 = Workbooks.Open(filepath1)

Set ws1 = wb1.Worksheets("Sheet1")

Call あいうえお

End Sub
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
Sub あいうえお()

ws1.Cells(1, 1) = "あいうえお"

End Sub

No.2 ベストアンサー 回答者： tatsumaru77 回答日時： 2025/02/23 13:48

>モジュール変数の場合は、呼び出し側から実行しないといけないルールですか？？？

原則は、そう考えてください。
Sub あいうえお()の中で、ws1を使用していますが、
これは、呼び出し元で、ws1の内容をきちんと設定しているから、
OKになります。
直接、Sub あいうえお()を呼び出した場合は、ws1の内容がきちんと設定されていないので、エラーになります。

No.1 回答者： fadklsj 回答日時： 2025/02/23 12:01

上記の質問を

https://chatgpt.com/ にコピペしてください。
解決します。