ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Excel Ping Command..via web... (https://www.excelbanter.com/excel-programming/347894-excel-ping-command-via-web.html)

HickoryShade[_4_]

Excel Ping Command..via web...
 

I have a 25 page excel workbook that contains specific network equipmen
for 25 remote sites. I have saved it as a web page. Question: Is there
way to ping each network device from the web page. I have used:

Shell ("ping.exe -t " & ActiveCell.Value), vbNormalFocus

but I'm not to sure how to link an active cell (which there is n
active cell on a web page).

Any insight on this would be greatly appreciated....TIA.

--
HickoryShad
-----------------------------------------------------------------------
HickoryShade's Profile: http://www.excelforum.com/member.php...nfo&userid=266
View this thread: http://www.excelforum.com/showthread.php?threadid=49270


Tom Ogilvy

Excel Ping Command..via web...
 
Dim cell as Range
for each cell in ThisWorkbook.Worksheets("Sheet1").Range("A1:A25")
Shell ("ping.exe -t " & Cell.Value), vbNormalFocus
Next

but not sure what shelling a ping is going to do for your.

--
Regards,
Tom Ogilvy


"HickoryShade"
wrote in message
...

I have a 25 page excel workbook that contains specific network equipment
for 25 remote sites. I have saved it as a web page. Question: Is there a
way to ping each network device from the web page. I have used:

Shell ("ping.exe -t " & ActiveCell.Value), vbNormalFocus

but I'm not to sure how to link an active cell (which there is no
active cell on a web page).

Any insight on this would be greatly appreciated....TIA..


--
HickoryShade
------------------------------------------------------------------------
HickoryShade's Profile:

http://www.excelforum.com/member.php...fo&userid=2667
View this thread: http://www.excelforum.com/showthread...hreadid=492700




HickoryShade[_5_]

Excel Ping Command..via web...
 

Thanks for the post......sorry for the newbe question but how would I
incorp. this into the web base excel:

Dim cell as Range
for each cell in ThisWorkbook.Worksheets("Sheet1").Range("A1:A25")
Shell ("ping.exe -t " & Cell.Value), vbNormalFocus
Next

As a vbs and link the cell to it or ??


--
HickoryShade
------------------------------------------------------------------------
HickoryShade's Profile: http://www.excelforum.com/member.php...fo&userid=2667
View this thread: http://www.excelforum.com/showthread...hreadid=492700


Tom Ogilvy

Excel Ping Command..via web...
 
What is the "web base excel"? Are you talking about the Office Web
Components? If so, this is the wrong group. (although someone may have an
answer for you)

In excel itself, you could use the change event. The Web Components support
a much richer event list, but I don't know the particulars.

--
Regards,
Tom Ogilvy







"HickoryShade"
wrote in message
news:HickoryShade.1zxp1b_1134402602.9815@excelforu m-nospam.com...

Thanks for the post......sorry for the newbe question but how would I
incorp. this into the web base excel:

Dim cell as Range
for each cell in ThisWorkbook.Worksheets("Sheet1").Range("A1:A25")
Shell ("ping.exe -t " & Cell.Value), vbNormalFocus
Next

As a vbs and link the cell to it or ??


--
HickoryShade
------------------------------------------------------------------------
HickoryShade's Profile:

http://www.excelforum.com/member.php...fo&userid=2667
View this thread: http://www.excelforum.com/showthread...hreadid=492700




HickoryShade[_6_]

Excel Ping Command..via web...
 

I Save the excel workbook as "Web Page". On each of the 25 pages is
list of IP's. I'm wonding if I can create individual links that woul
ping that active cell and only that active cell. Meaning......File/Sav
as Web Page....Open excel web page/click on link(link is and read
192.168.1.1)/ping that link.....

--
HickoryShad
-----------------------------------------------------------------------
HickoryShade's Profile: http://www.excelforum.com/member.php...nfo&userid=266
View this thread: http://www.excelforum.com/showthread.php?threadid=49270


Tom Ogilvy

Excel Ping Command..via web...
 
If you click the add interactivity button, then you are using the office web
components I believe.


here is a place to start:

http://support.microsoft.com/default...b;en-us;319793
HOW TO: Find Office Web Components (OWC) Programming Documentation and
Samples

--
Regards,
Tom Ogilvy



"HickoryShade"
wrote in message
news:HickoryShade.1zxw7m_1134411902.5532@excelforu m-nospam.com...

I Save the excel workbook as "Web Page". On each of the 25 pages is a
list of IP's. I'm wonding if I can create individual links that would
ping that active cell and only that active cell. Meaning......File/Save
as Web Page....Open excel web page/click on link(link is and reads
192.168.1.1)/ping that link......


--
HickoryShade
------------------------------------------------------------------------
HickoryShade's Profile:

http://www.excelforum.com/member.php...fo&userid=2667
View this thread: http://www.excelforum.com/showthread...hreadid=492700




HickoryShade[_7_]

Excel Ping Command..via web...
 

Thanks for the Info!!.....I was able to google the question a little
more and found somewhat of a solution. I use:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
If Target.Range.Address = "$B$16" Then
Shell ("ping.exe -t " & ActiveCell.Value), vbNormalFocus
End If

This is actually within the sheet itself. For every link I add this
code and change "$B$16" to represent the actual cell.....As a workbook
it works great. But when I save it as a web page I lose all
functionality.....Any thoughts on how I might be able to resolve
this....

TIA....


--
HickoryShade
------------------------------------------------------------------------
HickoryShade's Profile: http://www.excelforum.com/member.php...fo&userid=2667
View this thread: http://www.excelforum.com/showthread...hreadid=492700



All times are GMT +1. The time now is 05:13 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com