Excel VBA質問箱 IV

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

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


2815 / 13644 ツリー ←次へ | 前へ→

【65814】同名のファイルがありますウィンドウの戻り値の取得 すいか 10/6/29(火) 13:18 質問[未読]
【65815】Re:同名のファイルがありますウィンドウの... Jaka 10/6/29(火) 14:03 発言[未読]
【65816】Re:同名のファイルがありますウィンドウの... すいか 10/6/29(火) 14:45 質問[未読]
【65817】Re:同名のファイルがありますウィンドウの... Jaka 10/6/29(火) 15:07 発言[未読]
【65819】Re:同名のファイルがありますウィンドウの... すいか 10/6/29(火) 15:20 質問[未読]
【65820】Re:同名のファイルがありますウィンドウの... neptune 10/6/29(火) 15:45 発言[未読]
【65822】Re:同名のファイルがありますウィンドウの... すいか 10/6/29(火) 16:03 お礼[未読]
【65821】Re:同名のファイルがありますウィンドウの... Jaka 10/6/29(火) 15:45 発言[未読]

【65814】同名のファイルがありますウィンドウの戻...
質問  すいか  - 10/6/29(火) 13:18 -

引用なし
パスワード
   こんにちは。
宜しくお願いします。

ActiveWorkbook.SaveAs Filename:=FName
とやった時に、指定したフォルダに同名のファイルがあると、
「既に同じ名前のファイルがあります。・・・」
とウィンドウが出ます。
はい を選べば問題はありませんが、いいえ や キャンセル を
選ぶとエラーになります。

このエラーを回避するために、どのボタンが選ばれたかを取得したい
のですが、このウィンドウは自分で出しているわけではないので、
どうすればいいかわかりません。
どうすれば取得できるのでしょうか?
宜しくお願いします。

【65815】Re:同名のファイルがありますウィンドウ...
発言  Jaka  - 10/6/29(火) 14:03 -

引用なし
パスワード
   保存する前に同名のファイルがあるのか確認するのが先。
Dir関数でも確認できるので、使い方などは、「Dir」で検索すれば見つかるんじゃないかと。

【65816】Re:同名のファイルがありますウィンドウ...
質問  すいか  - 10/6/29(火) 14:45 -

引用なし
パスワード
   ▼Jaka さん:
>保存する前に同名のファイルがあるのか確認するのが先。
>Dir関数でも確認できるので、使い方などは、「Dir」で検索すれば見つかるんじゃないかと。

すみません、よくわからないのですが。
>保存する前に同名のファイルがあるのか確認
しても、「同名ファイルがある」ウィンドウは自動的に出てきて、
いいえやキャンセルを選べば、やっぱりエラーになりませんか?

【65817】Re:同名のファイルがありますウィンドウ...
発言  Jaka  - 10/6/29(火) 15:07 -

引用なし
パスワード
   ▼すいか さん:
>すみません、よくわからないのですが。
>>保存する前に同名のファイルがあるのか確認
>しても、「同名ファイルがある」ウィンドウは自動的に出てきて、
>いいえやキャンセルを選べば、やっぱりエラーになりませんか?

同名のファイル名がある場合は、保存しなきゃいいんです。

【65819】Re:同名のファイルがありますウィンドウ...
質問  すいか  - 10/6/29(火) 15:20 -

引用なし
パスワード
   ▼Jaka さん:
>▼すいか さん:
>>すみません、よくわからないのですが。
>>>保存する前に同名のファイルがあるのか確認
>>しても、「同名ファイルがある」ウィンドウは自動的に出てきて、
>>いいえやキャンセルを選べば、やっぱりエラーになりませんか?
>
>同名のファイル名がある場合は、保存しなきゃいいんです。

ごめんなさい、私が意図をわかってないのだと思いますが。。
保存するしないはユーザ側に決めさせたいのですが。

話を戻しますが、
あのウィンドウでどのボタンが押されたかを取得するのは
難しいことということなのでしょうか?

【65820】Re:同名のファイルがありますウィンドウ...
発言  neptune  - 10/6/29(火) 15:45 -

引用なし
パスワード
   ▼すいか さん:
既にJaka さんから回答は出てますが、

>ごめんなさい、私が意図をわかってないのだと思いますが。。
意図というよりdir関数のhelpを調べて使用例を見ましたか?

>保存するしないはユーザ側に決めさせたいのですが。
要するにdir関数で保存する前に検索して問い合わせのMessageBoxを出さない
ようにすれば良いだけの話です。
・・・自分でuserに問い合わせるという意味です。

既にある場合はuserに決めさせれば良いだけの話。

>話を戻しますが、
>あのウィンドウでどのボタンが押されたかを取得するのは
>難しいことということなのでしょうか?
基本的には出来ません。

【65821】Re:同名のファイルがありますウィンドウ...
発言  Jaka  - 10/6/29(火) 15:45 -

引用なし
パスワード
   これで保存するファイル名を取得して、分岐するとか。

Savename = Application.GetSaveAsFilename("○○○.xls", "Excelファイル (*.xls), *.xls")
MsgBox Savename

【65822】Re:同名のファイルがありますウィンドウ...
お礼  すいか  - 10/6/29(火) 16:03 -

引用なし
パスワード
   ▼neptune さん:
▼Jaka さん:

>基本的には出来ません。
できないのなら、おっしゃっていること、理解できます。
ファイル名は、GetSaveAsFilenameでこちらで指定したものを
使用する仕組みになっています。
同じところに格納しようとすると、上書きするかどうかを
自動で聞いてきてくれるので、それを利用したかったのです。
(初心者なので、そういうちょっとしたことがいちいち
できないので (~_~;)

頑張って自力で出すようにします!!


Jaka さん、なかなかわからなくてすみませんでした!
おふたりとも、ありがとうございました<m(__)m>

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