ＥｘｃｅｌＶＢＡで自端末のＩＰアドレスを取得したい

質問

いつもお世話になっています。
ExcelVBAを使ってプログラミングをしています。
その中で自端末のIPアドレスが必要な部分があるのですが、
どうやったら自端末のIPアドレスが取れるかわからず困っています。

VBではWinsock1.LocalIPで簡単に取れましたが、
Excelにもこのような便利なものが標準で存在するのでしょうか？
バージョンはExcel2000です。

どなたかご存知の方、教えてください！

回答No.1

taka_tetsu · ベストアンサー

Winsock APIを使うのがいいでしょう。

こちらにサンプルがありますのでどうぞ。
http://www5.airnet.ne.jp/init/vb/tips/network001.html

また、自分のマシン名は、GetComputerNameというWindows APIで取得できますので、両方を組み合わせれば自端末のIPアドですが取得できます。

参考URL：

http://www5.airnet.ne.jp/init/vb/tips/network001.html

お礼

回答ありがとうございます。
VBのサンプルがついたHPまで教えて頂いて、大変ありがたかったです。
"ポインタの知識が必要"とあり、その時点で「うげ」と思ったのですが
そのままExcelにコピペするだけでできました。
サンプルってありがたいですねぇ。

しかしWinsockコントロール無しでしようとするとこんなにややこしいんですね・・・。
『やっぱりVBって便利でステキ』と思いました。

本当に助かりました。ありがとうございました。
また機会がありましたらよろしくお願いします（ペコリ）。

回答No.2

tomo-yuki

参考URLの

「ＩＰアドレス・ホスト名取得　標準モジュール」

をご覧ください。

参考URL：

http://www.remus.dti.ne.jp/~shenron/access/knowhow/MacAddress.html

お礼

回答ありがとうございます。
教えていただいたHPを見て「こんな詳しいページがあるとは・・・」と驚きました。
Googleで調べてもヒットせず途方にくれていたので、大変ありがたい情報でした。

本当に助かりました。ありがとうございました。
また機会がありましたらよろしくお願いします（ペコリ）。