MACRO to ping IP addresses and place result in adjacent cell

I originally used Leith's solution provided in the following thread:
http://www.excelforum.com/excel-prog...next-cell.html

Unfortunately, the macro does not do an IP address validation check before executing the "ping" and an empty IP address field incorrectly generates a 'Connected' ping result.

Can someone modify Leith's original macro to bypass the ping check if the IP address cell is blank and write out "Invalid IP" to the adjacent field?

Thanks in advance.

Please Login or Register  to view this content.