Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

61429 / 76807

←次へ　｜　前へ→


	【19998】Re:保存先の移動

生はげ - 04/11/23(火) 1:38 -


	引用なし

	パスワード

▼チーコさん：
回答ありがとうございます

現在の保存先から別のフォルダに保存したいです。
この時、元のフォルダにはブックを残したくないです。
回答のだと、元のフォルダに残ってしまいますよね、たぶん

よろしくお願いいたします。
>▼生はげさん：
>***保存先の選択なら以下の文で可能ですが***
>Dim FName as String
>　FName =Application.GetSaveAsFilename( _
>　　　　 FileFilter:="Excelファイル,*.xls,すべてのファイル,*.*")
>　If FName="False" Then Exit Sub
>　ActiveWorkbook.SaveAs Filename:=FName
>
>***ブックの保存なら以下の文でパスを変えれば可能です***
>ActiveWorkbook.SaveAs Filename:="E:\Book1.xls"
>
>
>>保存先を移動させる方法はないでしょうか。
>>よろしくお願いいたします。

0 hits

▼

【19995】保存先の移動 生はげ 04/11/23(火) 0:42