如何檢查「所有」文本框是否爲空（不是單獨的文本框）

Question

我在MS.Excel（VBA）中有兩個乘法表單。兩個乘法都有多個文本框。第二頁上的文本框全部以「txtM」加上一個升序編號（txtM1，txtM2等）開頭。在「保存」我只想記住用戶，如果第二個多頁（索引= 1）上的所有文本框是emtpy。如果其中一些是空的，但是一組完整的文本框表明用戶只是忘記點擊多頁的第二個「選項卡」，那麼它完全可以。

我已經嘗試了一些東西（見下文），但迄今尚未設法找到合適的解決方案。

For Each crtl In Me.Controls 
    If crtl.Name Like "txtM*" Then 
     If crtl.Value = "" Then 
      MsgBox "dont forget .... blablabla" 
       Me.MultiPage1.Value = 1 
      Exit Sub 
     End If 
    End If 
Next 

THX &問候， zoidie

Answer 1

我會做這樣的事情：

Dim allEmpty As Boolean 
allEmpty = True 

For Each crtl In Me.Controls 
    If crtl.Name Like "txtM*" Then 
     If Trim(crtl.Value) <> "" Then 
      allEmpty = False 
      Exit For 
     End If 
    End If 
Next 

If allEmpty Then 
    MsgBox "dont forget .... blablabla" 
    Me.MultiPage1.Value = 1 
    Exit Sub 
End If