使用[插入行]按钮操作,提示“此表不支持插入行功能”。我使用的是自定义的菜单和工具栏。[插入行]按钮代码是从系统菜单移植过来的。用系统菜单,插入行功能正常。以下是系统菜单中的代码,如果要用到自定义菜单和工具栏中,代码应如何?
当前表插入行
CurrentTable.Rows.InsertNew()
上移行
With CurrentTable
If .Position > 0 Then
.Current.Move(.Position - 1)
End If
End With
下移行
With CurrentTable
If .Position < .Count - 1 Then
.Current.Move(.Position + 1)
End If
End With
您首先需要将设置标志列移植进来,然后将插入行标志列选中,在这里,您可以增加一层判断,非设计者禁止调用设置标志列!
这几个表都不能插入行,新增表可以,不知道是不是与权限表有关(权限表隐藏了,通过自定义的菜单调用)
抱歉,我现在用的是开发版,交流起来确实不方便,都怪狐爸不让通用。