Runtime.getRuntime().exec(System.getenv("windir") +"\\system32\\"+"wscript.exe \"C:\\Program Files\\Jboss\\jboss-5.1.0.GA\\server\\default\\deploy\\myMacro.vbs\"")

строка 10
символ 49
Ошибка: Предполагается наличие ')'
Код: 800A03EE 
Источник: Ошибка компиляции Microsoft VBScript

Sub MyMacro()

'
' MyMacroMacro
' 

'
    Sheets.Add
    ActiveSheet.Name = "Summary"
    ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
        "InWeek!R1C1:R830C21", Version:=xlPivotTableVersion12).CreatePivotTable _
        TableDestination:=ActiveSheet.Cells(3, 1), TableName:="PivotTable1", DefaultVersion _
        :=xlPivotTableVersion12
    
    Cells(3, 1).Select
    With ActiveSheet.PivotTables("PivotTable1").PivotFields("calls")
        .Orientation = xlPageField
        .Position = 1
    End With
......