I have tried multiple ways but couldn't make it work. Please help. below is what I have.
thanks in advance.
Code: Select all
Sub testSubset()
Dim x
ThisWorkbook.Activate
ActiveSheet.Activate
x = Application.Run("SUBDEFINE", "dev1.dev.boa.com:HeadCount", "testVBss", "A1:A10")
Debug.Print x
End Sub