No.2ベストアンサー
- 回答日時:
こんにちは。
Sub 練習()
Dim myR
myR = Application.InputBox(prompt:="数量を入力しなさい", Type:=1)
If VarType(myR) = vbBoolean Then Exit Sub
Range("C2").Value = myR
End Sub
Application.InputBox メソッドの場合は、
戻り値のデータ型で判別します。
No.1
- 回答日時:
こんにちは!
>If myR = False Then Exit Sub
の部分を
>If myR = "" Then Exit Sub
としてみてはどうでしょうか?
FALSE=0 のコトですので、
何も変化なくマクロが終わってしまいます。
尚、質問のコードではインプットボックスタイプを
>Type:=1
とされていらっしゃるので、
数値の場合がTRUE・文字列の場合はFALSEとなります。
というコトは
>If myR = True Then Exit Sub
としても大丈夫だと思います。m(_ _)m
ありがとうございました。
Sub 練習()
Dim myR
myR = Application.InputBox(prompt:="数量を入力しなさい", Type:=1)
If myR = "" Then Exit Sub
Range("C2").Value = myR
End Sub
にしたら、0を入力したらちゃんと0が出ましたが、キャンセルボタンを押すと、C2にfalseがでました。
falseが出るのは、うーむです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) InputBoxでキャンセルボタンを押したらファイル自体を閉じたい 3 2022/07/23 17:52
- Visual Basic(VBA) ExcelVBA No.を自動連番で設定をしながらデータ入力をしたい 2 2022/08/03 18:19
- Visual Basic(VBA) セルS2に入力した「月」と一致したB列の右隣へセルS110の値を転記する下記マクロを実行するとエラー 2 2022/12/06 17:32
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
- Visual Basic(VBA) excel2021で実行できないマクロ。どこを直したらいいのか 2 2022/03/28 03:40
- Visual Basic(VBA) C3とC4のセルに、Visual basicで実行した時入力した値をC3に表示させ、その後に、C3に 1 2023/07/14 09:43
- Excel(エクセル) 2つのVBAを一緒にしたら機能しなくなりました(エクセル) 7 2022/06/02 12:41
- Visual Basic(VBA) シート削除のマクロで「deleteメソッドは失敗しました」となります。助けてください! Sub 不要 6 2022/09/08 16:41
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBAで、条件に一致する...
-
javascriptからjavaを呼び出したい
-
Excel VBA シェイプの原型のサ...
-
エクセルVBAにおけるON TIMEメ...
-
Labelコントロールに数字を代入...
-
VBPをダブルクリックするとたま...
-
onClickで関数呼出し後に、結果...
-
ExcelのxlDialogInsertPictureで。
-
【sendkeysメソッドが動かずに...
-
コマンドプロンプト実行後に画...
-
Refreshメソッドの使い方
-
for文(拡張)内の変数(ローカ...
-
DataGridViewでセルクリックイ...
-
Excel VBA でExcelを終了したい...
-
3つの倍精度浮動小数点値の平均...
-
(String args[])というメッソ...
-
「CA2202: オブジェクトを複数...
-
PDFファイルから別ウィンドウで...
-
ShellExecuteってなんで関数?
-
JSPで<SELECT>の中にDBから持っ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBAで、条件に一致する...
-
エクセルVBAにおけるON TIMEメ...
-
【sendkeysメソッドが動かずに...
-
コマンドプロンプト実行後に画...
-
onClickで関数呼出し後に、結果...
-
DataGridViewでセルクリックイ...
-
Labelコントロールに数字を代入...
-
ExcelのxlDialogInsertPictureで。
-
final修飾子を使っているのに、...
-
JSPで<SELECT>の中にDBから持っ...
-
VBPをダブルクリックするとたま...
-
Excel VBA でExcelを終了したい...
-
Refreshメソッドの使い方
-
ウィンドウを最前面にできません
-
javascriptからjavaを呼び出したい
-
VB.netで、シリアル通信のタイ...
-
mainメソッドのthrows節で設定...
-
VBAでSaveAs使用し、指定してい...
-
PDFファイルから別ウィンドウで...
-
Application.Wait の参照設定
おすすめ情報