2017-04-08 19 views
0

我需要一個幫助,我做了一個用戶窗體1 CommandButton和4 TextBox,即時嘗試要做的是。如果所有4個文本框仍然爲空,我想禁用CommanButton。Excel VBA,如果禁用一個或多個文本框爲空的commandbutton

我已經發現,有助於爲只有1個文本框代碼中,我使用的代碼

私人小組TextBox1_Change()

如果TextBox1.Value = 「」 那

CommandButton1.Enabled =假

否則

CommandButton1.Enabled =真

結束如果

結束子

當我在TextBox2中使用相同的代碼我endup卡住,命令按鈕被使能,當我使用代碼(如果TextBox1.value & textbox2.value & TextBox3.value & TextBox4 .value =「」then commandbutton1.enabled = false) 命令按鈕在填充文本框1後是stil啓用的。

有什麼想法嗎?

+0

是否要*禁用*如果**所有**框爲空或者**任何**框爲空* ?? * –

+0

如果所有框都爲空,我想禁用.. –

回答

0

用途:

If TextBox1.Value & TextBox2.Value & TextBox3.Value & TextBox4.Value = "" Then 

如果值的串聯是空的,那麼所有的值必須是空的。

2

您不需要任何中頻條件。

CommandButton1.Enabled = cbool(Len(Textbox1.Text) + Len(Textbox2.Text) _ 
          + Len(Textbox3.Text) + Len(Textbox4.Text)) 

CBool​​(x)= True,而x是0以外的任何數字,在這種情況下結果爲False。如果任何文本框中有任何內容,則它們的組合長度將大於0,並且CBool​​的結果爲True。

+0

聰明的方法! –

相關問題