以下代码,可以把光标移动到当前行的第一列。如果想光标(焦点)移动某一列以及标上红色宋体,请问应该如何修改?
With CurrentTable
Dim i As Integer
i = .FindRow("[光标位置] = True ", 0, True) '从头开始查找 ’当前行已在“光标位置”这一列设置:True
i rr >= 0 Then '如果找到的话
.Position = rr '定位到找到的行。
End If
End With
[此贴子已经被作者于2024/4/26 22:44:04编辑过]
感谢蓝版主,参考例子中的以下命令解决
再例如,选择表员工表当前行的姓名列:
With Tables("员工")
.Select(.RowSel, .Cols("姓名").Index)
End With