忽略特定多页页面上的更改

时间:2018-12-04 18:31:26

标签: excel vba userform

我在用户窗体上有一个MultiPage控件。我还有一个类,用于检测整个表单上的文本框,复选框和组合框的任何更改。 (例如,如果我键入或选择了某些内容,则该类会检测到它并使“保存”按钮可见)。

在MultiPage控件的Page3上,我有一些文本框。我不希望类文件检测此“选项卡”上的更改。有没有办法告诉我的班级忽略该页面上的任何更改?

编辑:
本质上,当我在MultiPage控件(位于用户窗体中)的第3个选项卡(页面)上工作时,我不希望运行以下代码

Option Explicit

Private WithEvents MyTextBox As MSForms.TextBox
Private WithEvents MyComboBox As MSForms.ComboBox
Private WithEvents MyCheckBox As MSForms.CheckBox

Public Property Set ControlTB(tb As MSForms.TextBox)
    Set MyTextBox = tb
End Property

Public Property Set ControlCB(cb As MSForms.ComboBox)
    Set MyComboBox = cb
End Property

Public Property Set ControlCH(ch As MSForms.CheckBox)
    Set MyCheckBox = ch
End Property

Private Sub MyTextBox_Change()
    Call MainCode
End Sub

Private Sub MyComboBox_Change()
    Call MainCode
End Sub

Private Sub MyCheckBox_Change()
    Call MainCode
End Sub

Private Sub MainCode()  

    f_Main.btnUpdateProjectData.Enabled = True
    f_Main.btnUpdateProjectData.Visible = True
    f_Main.Is_Saved = False        

End Sub

0 个答案:

没有答案