如何修改MS Access电子表格视图中计算字段复选框的-1/0筛选选项

方法一：通过查询转换计算字段（推荐，同时解决筛选限制） #

原表的计算字段因存储为数值型布尔值（-1=True，0=False），导致筛选显示不友好，且数据表视图对表计算字段的筛选支持有限。改用查询作为表单数据源可同时解决两个问题：

1. 创建新查询，添加原表所有字段，再添加自定义计算字段：
   • 若要直接显示文本选项，用IIf函数转换结果：

     是否达标: IIf([你的原计算表达式], "是", "否")
     

   • 若要保留复选框的布尔交互，可保留原计算表达式，然后在查询设计的字段属性面板中，将该字段的格式设置为是/否。
2. 将该查询设置为表单的数据源，替代原表。
3. 在表单设计视图中，将计算字段的控件类型设为复选框，此时筛选对话框会显示“是”“否”，且支持正常筛选操作。

方法二：通过VBA自定义筛选选项 #

如果不想修改数据源，可通过VBA拦截筛选事件替换选项文本：

1. 打开表单设计视图，进入VBA编辑器。
2. 在表单的Filter事件中添加以下代码：

   Private Sub Form_Filter(Cancel As Integer, FilterType As Integer)
       Dim ctl As Control
       For Each ctl In Me.Controls
           ' 替换为你的计算字段控件名称
           If ctl.ControlType = acCheckBox And ctl.Name = "chkYourCalculatedField" Then
               ctl.RowSource = "是;否"
               Exit For
           End If
       Next ctl
   End Sub
   

   注：部分Access版本可能需要调整控件属性的设置方式，需根据实际情况测试。

内容的提问来源于stack exchange，提问作者Roman Vert