#==================================# # Pinger for Excel # #==================================# [概要] ネットワークの疎通を確認するDOS(あるいはUNIX)のコマンド「Ping」 をExcelのワークシート上で実行するプログラム。 「Ping」について詳しく知りたい人は以下のサイトで検索してみて下さい。 http://www.atmarkit.co.jp/ [使い方] 1.シート上に、サンプルのような、ネットワーク機器の一覧表を作成する。 2.必要に応じて、オートフィルタ等で対象の機器を絞り込む。 3.IPアドレス(又はホスト名)の欄から、確認したい範囲をマウスで選択。  (DHCPを使っているネットワークの場合は、IPアドレスは動的に割り当て   られるため、ホスト名しか役に立たない。) 4.「PING」ボタンをクリック。 5.接続状況欄に、順番に結果が書き込まれていき、「接続中」と書き込ま   れたサーバやクライアントは、共有フォルダ等にアクセスできるように   自動的にハイパーリンクが挿入される。   また、ルータについては、最近はwebブラウザで設定を行う機種が増えて   きているため、httpでリンクさせている。 6.ハイパーリンクやpingの結果を消去したい場合は、「クリア」ボタンを   クリック。 [本作品の改造について] パスワード等でロックしていません。 表のレイアウトもVBAのコードも自由な改造が可能です。 本作品は、以下のサイトのVB用のサンプルコードをExcelで操作しやすいよう に改造して作ってます。 http://www.mvps.org/vbnet/index.html?code/network/pingbyhostname.htm [備考] 本作品の使用に際して、当方は一切の責任を負わないものとします。 僕自身は特に著作権を主張しません。 [ご意見ご要望など]  ご意見ご要望などがありましたら,メールにて受け付けます。 ゆう-G Mail:yu-g@mbf.nifty.com