Skip hidden control when looping all controls on a userform

How about

Private Function EverythingFilledIn() As Boolean

    Dim AnythingMissing As Boolean
    EverythingFilledIn = True
    
    Dim ctl As MSForms.Control
    
    For Each ctl In Controls
      If TypeOf ctl Is MSForms.TextBox Or TypeOf ctl Is MSForms.ComboBox Then
         If ctl.Visible = True Then
            If ctl.Value = "" Then
              ctl.BackColor = rgbPink

              If Not AnythingMissing Then ctl.SetFocus
              AnythingMissing = True
              
              EverythingFilledIn = False
            End If
        End If
      End If
    Next ctl
    
 
End Function