次のコード（Excel VBA）で失敗するx = 1 Then Textbox.Value = x Then ...

Question

TextBoxの値が1

以下のコードを実行した後、MsgBoxは0を示します。

しかし、4番目のコード行のx1を1に変更すると、MsgBoxは1を正常に示します。

"Range（" A1 "）。Value"に "TextBox.value"を変更すると、Range（ "A1"）に1を入れた後、MsgBoxが正常に1を示します。

その結果、セルは変数を理解しているように見えますが、テキストボックスはありませんか？

質問： x1が1であることをExcel VBAで理解する方法を知りたいですか？

Dim x1, x3 As Integer 
x1 = 1 
x3 = 1 
If TextBox.value = x1 Then 
CT1 = x3 
End If 
MsgBox CT1 

いずれかのアドバイスをいただければ幸いです。ありがとう

Answer 1

私は答えを見つけました。

TextBoxには、整数ではなく文字列が含まれています。

だから、私は、変換コードを使用する必要があります。

CInt(TextBox.value) 

は私の整数の変数にテキストボックスから文字列値を変換します。

私はそれを正しく説明します。