论坛 › 文本处理与Office › Excel十字光标代码

扫黑除恶湖南组 发表于 2019-4-29 21:46:53

Excel十字光标代码

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Cells.Interior.ColorIndex=xlNone
    Rows(Target.Row).Interior.Color = RGB(255, 0, 0)
    Columns(Target.Column).Interior.Color = RGB(0, 0, 255)
End Sub
注意：行与列的颜色条可以自己修改颜色，由RGB(X,Y,Z)设定。

查看完整版本: Excel十字光标代码