能否设置Excel单元格光标闪烁，解决选中单元格难识别问题？

完全懂你的痛点！当表格里塞满了颜色、粗体和各种数据时，那细细的绿色边框确实像隐身了一样，找选中单元格得费半天劲。虽然大部分电子表格软件默认没做闪烁光标，但咱们有办法搞定，分不同软件给你说：

一、Microsoft Excel #

1. 先优化默认选中样式（不用代码） #

如果不想折腾代码，先把默认的选中边框调得更显眼：

• 打开Excel，点击左上角「文件」→「选项」
• 切换到「高级」标签，往下拉找到「编辑选项」区域
• 找到「显示单元格选择框」，把旁边的数值调大（默认是1，改成3-5，边框会明显粗很多）
• 另外，你还可以通过「文件」→「选项」→「自定义功能区」，添加「单元格格式」到快速访问栏，选中单元格后一键给它加个醒目的填充色（比如浅黄），用完再取消，应急很方便

2. 用VBA实现真正的闪烁效果 #

要是想要闪烁的选中单元格，可以用VBA宏来实现：

1. 按下Alt + F11打开VBA编辑器
2. 双击左侧的「ThisWorkbook」，粘贴下面的代码：

Dim blinkTimer As Double
Dim targetCell As Range

Sub StartBlinking()
    Set targetCell = Selection
    blinkTimer = Now + TimeValue("00:00:00.5")
    Application.OnTime blinkTimer, "ToggleBlink"
End Sub

Sub ToggleBlink()
    If targetCell Is Nothing Then Exit Sub
    If targetCell.Interior.ColorIndex = xlNone Then
        targetCell.Interior.ColorIndex = 6 ' 黄色，可换成你喜欢的颜色
    Else
        targetCell.Interior.ColorIndex = xlNone
    End If
    blinkTimer = Now + TimeValue("00:00:00.5")
    Application.OnTime blinkTimer, "ToggleBlink"
End Sub

Sub StopBlinking()
    On Error Resume Next
    Application.OnTime blinkTimer, "ToggleBlink", , False
    If Not targetCell Is Nothing Then
        targetCell.Interior.ColorIndex = xlNone
        Set targetCell = Nothing
    End If
End Sub

3. 回到Excel，按Alt + F8，运行「StartBlinking」，选中的单元格就会开始闪烁；要停止的话运行「StopBlinking」

小贴士：你可以把这两个宏添加到快速访问工具栏，点一下就能开关，非常方便

二、Google Sheets #

Google Sheets没有内置的闪烁功能，但可以用Apps Script实现：

1. 打开你的表格，点击「扩展程序」→「Apps Script」
2. 删除默认代码，粘贴下面的脚本：

let blinkInterval;
let originalColor;

function onSelectionChange(e) {
    // 先停止之前的闪烁
    if (blinkInterval) {
        clearInterval(blinkInterval);
        e.range.setBackground(originalColor);
    }
    // 记录原背景色
    originalColor = e.range.getBackground();
    // 开始闪烁，每500毫秒切换一次
    blinkInterval = setInterval(() => {
        const currentColor = e.range.getBackground();
        e.range.setBackground(currentColor === originalColor ? "#FFFF00" : originalColor);
    }, 500);
}

3. 点击「保存」，给脚本起个名字（比如CellBlinker），然后刷新你的表格。现在选中任意单元格，它就会自动开始闪烁，切换单元格时会自动停止上一个的闪烁并开始新的

三、通用应急技巧 #

不管用什么软件，临时找不到选中单元格时，按下Ctrl + A全选，然后再点击你要找的单元格，对比一下就能快速定位；或者选中单元格后，按Ctrl + 1打开单元格格式，给它加个粗红边框，用完再取消

内容的提问来源于stack exchange，提问作者Sanjay Manohar