主题：[求助]鼠标经过表行时的颜色

到表事件处理

事件：MouseEnterCell

代码：vars("t") = e.Table.Name

vars("r") = e.Row.Index

e.Table.Refresh

事件：MouseLeaveCell

代码：

vars("t") = ""

vars("r") = -1

事件：DrawCell

If e.Table.Name = vars("t") And e.Row.Index = vars("r") Then

e.Style = "样式1"

End If