fork download

copy

　Sub 別Bookのプログラムを実行()
    Dim targetAppFullName       As String
    Dim targetAppFileName       As String
    Dim targetAppMacroName      As String
 
    '呼び出し先のファイル名
    targetAppFileName = "ワークシート.xlsm"
 
    '呼び出し先のファイルに入っているマクロ名
    targetAppMacroName = "別ブックのすべてのセルを取得3"
 
    'パスとファイル名とマクロ名を指定の形にする
    targetAppFullName = "'" & ThisWorkbook.Path & "\" & targetAppFileName & "'" & _
                        "!" & targetAppMacroName
 
    'マクロを呼び出して実行する
    Application.Run targetAppFullName
 
End Sub

Main.java:1: error: illegal character: '\u3000'
?Sub ?Book?????????()
^
Main.java:1: error: class, interface, or enum expected
?Sub ?Book?????????()
     ^
Main.java:6: error: unclosed character literal
    '???????????
    ^
Main.java:9: error: unclosed character literal
    '????????????????????
    ^
Main.java:12: error: unclosed character literal
    '?????????????????????
    ^
Main.java:13: error: unclosed character literal
    targetAppFullName = "'" & ThisWorkbook.Path & "\" & targetAppFileName & "'" & _
                                                                             ^
Main.java:16: error: unclosed character literal
    '?????????????
    ^
7 errors

Standard output is empty