[BW] Refresh query in workbook via VBA

Sub t()
' run specific query
Run "SAPBEX.XLA!SAPBEXrefresh", False, ActiveWorkbook.Sheets("Sheet3").Cells(1, 1)
' run all queries
Run "SAPBEX.XLA!SAPBEXrefresh", true
End Sub