Results of 1 - 1 of about 58 for CurrentDirectory (0.000 sec.)
- [[20090609191704]]
- #score: 13656
- @digest: 8655693ec7b9321ce37d261322e9d7f0
- @id: 43867
- @mdate: 2009-06-10T06:05:37Z
- @size: 2098
- @type: text/plain
- #keywords: 客管 (11318), 理. (11185), 線la (9974), currentdirectory (7728), excek2007 (7107), 端末 (6941), 布マ (6721), 有線 (6198), 表フ (5180), 配布 (4491), 無線 (4419), 布用 (3899), る端 (3516), xxx (3280), ¥¥ (3119), 192 (2788), wscript (2129), 顧客 (2045), 電源 (1958), 末が (1883), トワ (1511), がネ (1296), 台数 (1203), shell (1085), 覧表 (1056), 管理 (1029), createobject (705), 混在 (580), ・-- (575), 一覧 (561), い" (550), err (523)
- 『自動配布の処理を作りたい』（なた）
こんにちは。なたと申します。 あるマクロ付エクセルファイルを会社で使用しています。 皆の意見などを聞きつつ、不具合個所を修正したあと、使用している端末に 配布したいのですが、今は手作業でコピーしています。 だんだん台数が増えてきて、大変になってきたので、一気に配布できればなー と思って、配布用の一覧表ファイルを作って配布マクロを作ろうと思ったのです が、電源が入っていない端末の処理に困っています。 一覧表にある端末がネットワークにつながっているかいないかの判定をしたいの ですが、どうすればよいのでしょうか? 一覧表ファイルの作りはこんな感じです。 DOMAIN PATH FILENAME 判定 更新日 更新時間 処理端末 XX22 ¥¥192.xxx.xx.22¥xxx¥ 顧客管理.xls XX25 ¥¥192.xxx.xx.25¥xxx¥ 顧客管理.xls XX30 ¥¥192.xxx.xx.30¥xxx¥ 顧客管理.xls XXX62 ¥¥192.xxx.xx.112¥xxx¥ 顧客管理.xls XXXX64 ¥¥192.xxx.xx.114¥xxx¥ 顧客管理.xls ヒントだけでも教えてくださーい＞＜ wiin XP Excek2007 ---- 2007で動くか解りません。 こんな感じでは? BJ On Error Resume Next CreateObject("WScript.Shell").CurrentDirectory = "¥¥192.xxx.xx.22¥xxx" If Err Then Msgbox "つながってない" Err.Clear End If CreateObject("WScript.Shell").CurrentDirectory = "¥¥192.xxx.xx.25¥xxx" If Err Then Msgbox "つながってない" Err.Clear End If ・ ・ ---- BJさまレスありがとうございます。 やってみましたが、接続されているPCも「つながっていない」となってしまいました。 >CreateObject("WScript.Shell").CurrentDirectory = "¥¥192.xxx.xx.22¥xxx" ←ここは ファイル名まで記述したほうがいいのですか? （なた） ---- >端末がネットワークにつながっているかいないかの あ、LANケーブルじゃなかったんですね。 すみません。そういう環境がないのでわかりません。 BJ ---- 有線LANと無線LANが混在しています。 なんだかエラー処理でいけそうな気がしてきました。 ありがとうございます。BJ様 （＞＜ノ （なた） ---- 直接の回答ではありませんが、ご参考に。 http://www.asahi-net.or.jp/‾ef2o-inue/menu/menu06.html (Mook) ---- とてもためになります!ありがとうございます!（なた）... - https://www.excel.studio-kazu.jp/wiki/kazuwiki/200906/20090609191704.txt - [detail] - similar
PREV
NEXT
Powered by Hyper Estraier 1.4.13, with 97045 documents and 608224 words.
訪問者：