Dos command issuing

[Asrampd]

Someone kindly answered my query about how to get the contents of the currently hightighted cell into a variable and how to place it elsewhere. They suggested this....

Sub CurrentCell()
Dim CurrentCellText As String
Dim CurrentCellString As String
CurrentCellString = CStr(ActiveCell.Value)
'.......
'.......
Range("G16").Value = CurrentCellString
End Sub

My question now is - If the cell contains a runnable Dos comand, how do is send it to a Command window. (E.g. netsh interface ip address local static 192.168.0.1.255.255.255.0) (this sets your NIC's ip address)

Ta

 

[Scott Huish]

How about:

Shell Range("G16")

 

[Asrampd]

Yep that worked - I just need to use the current cell instead of a specified one.

Ta.

 

[Asrampd]

Sorry, I think i gave the wrong impression when I said "I just need to substitute the current cell" - I should have said "How do I" substitute the current cell ?

Ta.

 

[Scott Huish]

Shell ActiveCell

 

[Asrampd]

Oh so simple - easy when you know how - Thanks