Excel ユーザーフォームで計算 空欄の場合のエラー処理

テキストボックス1とテキストボックス2があり、
テキストボックスAに数字を入力し、CommandButtonBBをクリックすると消費税8%が計算され、
テキストボックスCへ表示されるように作りました。

Private Sub CommandButtonBB_Click()
Me.テキストボックスA.Value = ""
Me.テキストボックスA.SetFocus
テキストボックスC = テキストボックスA * 0.08
End Sub

クリックすると消費税が表示されるのは良いんですが、
テキストボックス1が空欄の場合CommandButtonBBをクリックしてしまうと
エラーになります。
もし空欄の場合にクリックしてもエラーとならなくするにはどうしたら良いですか?

No.1 ベストアンサー 回答者： tatsu99 回答日時： 2018/11/09 18:09

If Me.テキストボックスA.Value = "" Then Exit Sub

を先頭に入れてください。

この回答へのお礼

あっさり解決しました。有難うございます!!

お礼日時：2018/11/09 18:23