Excel VBA質問箱 IV

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

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


11838 / 13646 ツリー ←次へ | 前へ→

【13777】ファイルの移動 sa 04/5/13(木) 11:51 質問[未読]
【13778】Re:ファイルの移動 ちゃっぴ 04/5/13(木) 11:57 回答[未読]
【13780】Re:ファイルの移動 Jaka 04/5/13(木) 12:42 回答[未読]
【13807】Re:ファイルの移動 sa 04/5/14(金) 9:21 お礼[未読]
【13823】Re:ファイルの移動 IROC 04/5/14(金) 13:53 回答[未読]
【13826】Re:ファイルの移動 Jaka 04/5/14(金) 14:34 発言[未読]

【13777】ファイルの移動
質問  sa  - 04/5/13(木) 11:51 -

引用なし
パスワード
   すみません 早急に 
下記のついて教えてもらいたいことがあります
宜しくお願いします


 fileToOpen = Application.GetOpenFilename("テキスト ファイル (*.csv), *.csv")
 If VarType(fileToOpen) = vbString Then
   MsgBox "選択されたファイル : " & fileToOpen
 End If

 If fileToOpen <> "False" Then
  Workbooks.Open Filename:=fileToOpen
              

で開いたファイル(fileToOpen)を他の場所に移動したいのですが

 例えば Cドライブ 直下とか

【13778】Re:ファイルの移動
回答  ちゃっぴ E-MAIL  - 04/5/13(木) 11:57 -

引用なし
パスワード
   SaveAs メソッドを使用すれば出来ます。

使い方はヘルプを参照してください。

【13780】Re:ファイルの移動
回答  Jaka  - 04/5/13(木) 12:42 -

引用なし
パスワード
   こんにちは。

[#9576]

【13807】Re:ファイルの移動
お礼  sa  - 04/5/14(金) 9:21 -

引用なし
パスワード
   ちゃっぴさん、Jaka さん
有難うございました
save as と
delete  でファイルの移動が出来ました

今後も宜しくお願いします


▼Jaka さん:
>こんにちは。
>
>[#9576]

【13823】Re:ファイルの移動
回答  IROC  - 04/5/14(金) 13:53 -

引用なし
パスワード
   >save as と
>delete  でファイルの移動が出来ました

Name ステートメント も利用できると思います。

【13826】Re:ファイルの移動
発言  Jaka  - 04/5/14(金) 14:34 -

引用なし
パスワード
   ▼IROC さん:
>>save as と
>>delete  でファイルの移動が出来ました
>
>Name ステートメント も利用できると思います。

私のところも読んでおいてね。

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