Excel VBA質問箱 IV

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

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


65322 / 76733 ←次へ | 前へ→

【15986】Re:DOSにてファイルコピーに関して
回答  ちゃっぴ  - 04/7/13(火) 23:15 -

引用なし
パスワード
   >FileCopy ステートメントじゃダメなんですかね。

パス名が長いとFileCopy ステートメントはエラーになるので
FileSystemObjectのCopyFile、もしくはCopyメソッドを
使用したほうがいいと思います。

また、

> ファイルオープン = ファイルオープン.Items().Item().Path & "\"

は感心しません。ファイルオープンはオブジェクト型(Shell32.Folder)と
String型になりますので、Variant型変数以外で宣言されていると
エラーになります。

どうせやるなら、
Dim ファイルオープン As Object
Dim コピー先ファイル名 As String

コピー先ファイル名 = ファイルオープン.Items().Item().Path & "\" _
   & "TEST.txt"

としたほうがいいと思います。

Dosコマンドを実行するときはパス名に半角スペースが含まれる場合を考慮して、
パス名全体をダブルコーテーションで囲っておいたほうがいいです。

あと、Shell関数は別のプロセスとして動作するため、
Shell関数を呼び出したものの終了後、
何かを実行する場合には、プロセスが終了するまで
待機するようプログラミングする必要があります。

これを避けるには、WSHのRUNメソッドを使用して
呼び出す方法があります。
こちらなら、引数指定で終了するまでプロシジャーの実行を
待機させることができます。

3 hits

【15964】DOSにてファイルコピーに関して yasu 04/7/13(火) 16:43 質問
【15975】Re:DOSにてファイルコピーに関して IROC 04/7/13(火) 18:23 回答
【15976】Re:DOSにてファイルコピーに関して yasu 04/7/13(火) 18:45 発言
【15978】Re:DOSにてファイルコピーに関して [名前なし] 04/7/13(火) 20:53 発言
【15986】Re:DOSにてファイルコピーに関して ちゃっぴ 04/7/13(火) 23:15 回答
【16000】Re:DOSにてファイルコピーに関して yasu 04/7/14(水) 11:11 お礼

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