Plugging Excel Data In Script

[DUnnerstall]

I am trying to plug an IP address from Excel into a script to ping it. My code to assign the IP to a string is:

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("c:\BankIP\branchiptest.xls")
strIPAddress = Array(objExcel.Cells(2,6).Value)

And the script goes like this:

Dim WSHShell, rtnCode
Const WindowStyle = 0
Const WaitOnReturn = True Set WSHShell = CreateObject("WScript.Shell")
rtnCode = WSHShell.Run("Ping -n 1 -w 1 " + strIPAddress, WindowStyle, WaitOnReturn)
Set WSHShell = Nothing
MsgBox(rtnCode)

But it is unsuccessful. rtncode has a value of null. If I assign an actual IP address to strIPAddress it runs.

 

[PHV]

What is the value of F6 in the spreadsheet ?
Why not simply this ?
strIPAddress = objExcel.Cells(2,6).Value

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[PHV]

OOps, sorry for the typo.
What is the value of F[!]2[/!] in the spreadsheet ?
Why not simply this ?
strIPAddress = objExcel.Cells(2,6).Value

 

[DUnnerstall]

That works, thank you.
The value of F2 in the spreadsheet is an IP address.