Hi Lawrence,

To concatenate string values, you use the ampersand (&) character. And to
get the value of a cell, you can use the Value property of the Range object.
Also, you don't need the full path to mstsc, as it is typically in the PATH
environment variable (since it resides in a system folder). This code
should work:

Private Sub CommandButton1_Click()
' Run Remote Desktop.
Shell "mstsc.exe /v:" & Range("B3").Value, 1
End Sub

--
Regards,

Jake Marx
www.longhead.com


[please keep replies in the newsgroup - email address unmonitored]

Lawrence Miller wrote:
I currenlty have 175 sites of network addresses (1 site per sheet).
Each sheet has the IP address I need to connect to in cell B3.

I have a command button that opens Remote Desktop to connect to this
address, but I have had to type the address manually into the VBA for
each sheet.

I am trying to pass the address value in cell B3 to the VBA for the
command button. (w.x.y.z is the IP address of the target system)

I have tried setting a variable to the contents of cell B3, but can
not pass it to mstsc.exe command line

Thnaks in advance for assistance with this

ex:

Private Sub CommandButton1_Click()
Dim RetVal

' Run Remote Desktop.
RetVal = Shell("c:\windows\system32\mstsc.exe /v:w.x.y.z", 1)
End Sub