无法任意隐藏行,如果要做,你可以把这一行锁住,然后再afterOpenProject和DataRowLockedChanged写代码
Tables("表A").Filter = "_Locked = false"