Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


19768 / 76732 ←次へ | 前へ→

【62390】Re:サーバーからの読み込み
発言  kanabun  - 09/7/16(木) 11:52 -

引用なし
パスワード
   ▼亜矢 さん:
こんにちは。

mypathの部分はネットワーク(サーバー)に変わりました
>mypathを"\\・・・以下のサーバーのPathにしましたが、
>データが読めませんでした。

>mypath = "C:\Users\aya\SEIBAN\"
>myfilename = Dir(mypath, 0)
>Do While Len(myfilename) > 0
>  myFF = mypath & myfilename
>  myfilename = Dir()
>Loop

ローカルのときは そのコードで実行可能だったんですか?
それであれば、
> "\\・・・以下のサーバーのPath
の設定が何かちがっていたということは 考えられませんか?


>また、参照設定は何を参照設定にすればいいのかも

CreateObject関数でマクロが走り出してから、オブジェクトを作成する
のであれば、参照設定は不要です。

Dim MyFso As Object
Dim myTxt
のように、ぼんやりと(^^)総称オブジェクトで変数を宣言しておいて、

> Set MyFso = CreateObject("scripting.filesystemobject")
> Set myTxt = MyFso.OpenTextFile(Filename:=myFF, IOMode:=ForReading)
> 途中省略
で実行すればいけると思います。

872 hits

【62389】サーバーからの読み込み 亜矢 09/7/16(木) 11:24 質問
【62390】Re:サーバーからの読み込み kanabun 09/7/16(木) 11:52 発言
【62399】Re:サーバーからの読み込み 亜矢 09/7/16(木) 17:01 お礼
【62391】Re:サーバーからの読み込み ワイルドキャッツ 09/7/16(木) 12:31 発言
【62392】Re:サーバーからの読み込み ワイルドキャッツ 09/7/16(木) 12:36 発言
【62393】Re:サーバーからの読み込み kanabun 09/7/16(木) 13:02 発言
【62394】Re:サーバーからの読み込み ワイルドキャッツ 09/7/16(木) 13:24 発言

19768 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free