[[20250314153622]]　『セルに表示されたマクロ名を実行するには？』（笑顔）　ページの最後に飛ぶ

『セルに表示されたマクロ名を実行するには？』（笑顔）

Macro1からMacro10まで作成しました。
A1セルにマクロ名が出てくるようにしました。
ボタンを押してA1セルにMacro3となっていた場合
Macro3を実行するにはどうしたら良いですか？

＜使用 Excel：Excel2010、使用 OS：Windows10 ＞

 Application.Run　Range("A1").Value
 を試して見て下さい。

（xyz） 2025/03/14(金) 15:47:44

返信ありがとうございます。
実行時エラー　1004　となってしまいます
（笑顔） 2025/03/14(金) 15:52:54

 Sub test2()
    Dim s As String
    s = [A1].Value
    'Debug.print s     '確認してください
    Application.Run s
 End Sub
 ではどうですか？

（xyz） 2025/03/14(金) 16:06:57

返信ありがとうございます。
単体では上手くいきました。

Sub test3()

    Dim hensu1 As Integer
    Dim hensu2 As String
    Dim hensu3 As String

hensu1 = ActiveSheet.Range("S2").Value
hensu2 = ActiveSheet.Range("S3").Value
hensu3 = ActiveSheet.Range("S4").Value

    myData = Sheets("Sheet2").Range("L4")
    myData2 = Sheets("Sheet3").Range("L5")

Range(hensu2 & hensu1) = myData
Range(hensu3 & hensu1) = myData2

'ここでＡ1のマクロを実行したい

End Sub

この場合、どうしたら良いですか？
よろしくお願いいたします。
（笑顔） 2025/03/14(金) 16:18:15

 Application.Runに関する細かい仕様（と思われるもの）をメモしましたので、
 参考にしてください。

 なお、追加質問についても同じことじゃないですか？
 A1セルにマクロ名があるなら、既に回答しています。
 私はこれで失礼します。
（xyz） 2025/03/14(金) 16:23:26

コメント返信：