access有没有冻结列的VBA命令？

我的ACCESS　发表于：2014-05-16 17:21:38 　

百度上只有通过快捷菜单设置冻结列，居然查不到VBA冻结列的相关命令，有哪位老师晓得吗？

煮江品茶发表于：2014-05-16 17:32:07

me.阁下的子窗体名称.form.FrozenColumns=3

我的ACCESS 发表于：2014-05-16 18:36:24

煮江品茶老师，FrozenColumns为只读属性，不能赋值的，不知道老师为何能赋值？

麥田发表于：2014-05-17 15:00:07

Private Sub Form_Open(Cancel As Integer)
Me.text1.Locked = True
Me.text2.Locked = True
End Sub
注：text1, text2为需要冻结列的名称

renco 发表于：2014-05-17 17:04:57

给你个权威点的说明。

我的ACCESS 发表于：2014-05-17 20:36:09

按麥田等以上老师的方法测试了，没有成功，可能是我方法不对，再琢磨琢磨。

cspa 发表于：2014-05-17 22:50:13

FrozenColumns为只读属性，不能赋值的。在VBA中设置冻结列可按如下做法：

1、在标准模块中加入如下公共子程序：

Sub subFreezeCol(objText As Object)
objText.Application.RunCommand acCmdFreezeColumn
End Sub

2、调用：

在字段双击事件中调用，如有一字段名为时间的文本框，则：

Private Sub 时间_DblClick(Cancel As Integer)
subFreezeCol Me.[时间]
End Sub

我的ACCESS 发表于：2014-05-18 15:21:05

cspa老师的方法正确，谢谢

总记录：7篇页次：1/1 9 1 :

Access交流中心