Excel VBA質問箱 IV

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

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


30727 / 76732 ←次へ | 前へ→

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

【51268】キャンセル時 VBA初心者 07/9/7(金) 8:25 質問
【51269】Re:キャンセル時 neptune 07/9/7(金) 8:39 回答
【51270】Re:キャンセル時 VBA初心者 07/9/7(金) 9:22 お礼

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