«Если петля IF не работает в макросах EXCEL»

Question

Private Sub CommandButton1_Click()
  TextBox2.Value = 10
  TextBox3.Value = 5
  TextBox2.Value = (CInt(TextBox2))
  TextBox3.Value = (CInt(TextBox3))

  If TextBox2.Value > TextBox3.Value Then
    ActiveSheet.Select
    UserForm5.Show
  End If
End Sub

Элемент управления не входит в цикл IF, и «USerForm5 не отображается».

Может кто-нибудь, пожалуйста, помогите.

Reagrds

Answer 1

Сравнение выполняется в виде строк.Оберните CInt() вызовы вокруг значений в операторе IF, и все будет хорошо.

TextBox2.Value = 10
TextBox3.Value = 5
If CInt(TextBox2.Value) > CInt(TextBox3.Value) Then