Excel VBA質問箱 IV

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

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


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

30733 / 76738

←次へ　｜　前へ→


	【51269】Re:キャンセル時

neptune - 07/9/7(金) 8:39 -


	引用なし

	パスワード

こんにちは

//////////////InputBox メソッドHelpより解説部分の一部引用//////////
。[キャンセル] ボタンをクリックすると、False が返されます。
///////////////////引用終わり//////////////////////////////////////
ですから
dim 別名 As Variant
省略
別名 = Application.InputBox(prompt:="名前をつけてね(*^_^*)", _
　　Title:="　　新しいエクセルファイルとして保存します", Type:=2)
If TypeName(別名) = "Boolean" Then　'ｷｬﾝｾﾙ
　　　　Exit Sub
else
'したい処理
end if

のように出来ます。

※VBE画面の
　ツールメニュー
　　　オプション
　　　　　編集タブの「変数の宣言を強制する」
にチェックを入れることを強くお勧めします。
入れないと、バグの元になります。

0 hits

▼

【51268】キャンセル時 ＶＢＡ初心者 07/9/7(金) 8:25