以下代码，可以把光标移动到当前行的第一列。如果想光标（焦点）移动某一列以及标上红色宋体，请问应该如何修改？
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