防止用户取消隐藏数据表列

Question

我使用 ColumnHidden property 在访问数据表中隐藏了几列，就像这里的这个例子：

ColumnName.ColumnHidden = true

这很好用，但是当我查看数据表时，最终用户可以通过 "resizing" 隐藏列的 space 隐藏列的任一侧：

我发现了一些技巧，可以在某些事件 vba 等中使用 ColumnWidth 属性通过 vba 调整列的大小，但我想知道是否有是首先仅针对隐藏列禁用此 "resize" 功能的简单方法吗？

Answer 1

在MouseUp事件中你可以检查隐藏列的ColumnHidden是否为假（用户"resized"列），隐藏它。

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Me.MyHiddenColumn.ColumnHidden = False Then
    Me.MyHiddenColumn.ColumnHidden = True
End If
End Sub

防止用户取消隐藏数据表列

Prevent User From Unhiding Datasheet Columns

ms-access

vba

datasheet