“IF循环在EXCEL宏中不起作用”

时间:2011-03-13 07:37:52

标签: excel-vba vba excel

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

1 个答案:

答案 0 :(得分:4)

比较是作为字符串完成的。围绕CInt()语句中的值包裹IF次来电,您就会很好。

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