我需要条件格式化24个文本框,每个文本框有2个规则。根据月份,每条规则略有不同。有没有什么方法可以在一个屏幕上输入我的条件格式规则,所以我不必点击这么多按钮?另外,如果我甚至需要编辑规则,这将节省大量时间。伪码:
Style1 = FontFill.Red
Style2 = FontFill.Yellow
txtField1.ConditionalFormatting.Add("<rule text>", Style1)
txtField1.ConditionalFormatting.Add("<rule text>", Style2)
txtField2.ConditionalFormatting.Add("<rule text>", Style1)
txtField2.ConditionalFormatting.Add("<rule text>", Style2)
答案 0 :(得分:1)
您可以使用FormatConditions.Add Method代替伪代码。在“设计视图”中打开“Form3”后,我在立即窗口中执行了以下操作:
Forms("Form3").Controls("txtNote").FormatConditions.Add acFieldValue, acBetween, 10, 100
Forms("Form3").Controls("txtNote").FormatConditions(0).ForeColor = vbRed
' confirm the FormatCondition is enabled ...
? Forms("Form3").Controls("txtNote").FormatConditions(0).Enabled
True
然后从表单属性检查格式条件给了我这个......
对于24个控件,您可以创建一个应用条件格式的过程。规则更改时修改过程。或者将规则存储在表中,并让程序从表中读取规则。