Excel VBA質問箱 IV

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

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


19759 / 76732 ←次へ | 前へ→

【62399】Re:サーバーからの読み込み
お礼  亜矢  - 09/7/16(木) 17:01 -

引用なし
パスワード
   ▼kanabun さん:
>▼亜矢 さん:
>こんにちは。
>
>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)
>> 途中省略
>で実行すればいけると思います。
ありがとうございました。Pathを再確認したら実行できました。
お手数をお掛けしました。
888 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 発言

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