快速查找EXCEL整个工作表中的合并单元格
1. 按下 `Alt + F11`,打开VBA编辑器。
2. 在左侧的“项目”窗口中,找到你的工作簿,右键点击该工作簿下的任意工作表,选择 **插入 -> 模块**。
3. 在新建的模块窗口中,粘贴以下代码:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | Sub HighlightMergedCells() Dim cell As Range Dim ws As Worksheet Set ws = ActiveSheet ' 清除所有单元格的背景色(可选) ws.Cells.Interior.ColorIndex = xlNone For Each cell In ws.UsedRange If cell.MergeCells Then ' 给合并单元格添加颜色 cell.MergeArea.Interior.Color = RGB(255, 255, 0) ' 黄色 End If Next cell MsgBox "合并单元格已被标记为黄色。" End Sub |
4. 关闭VBA编辑器,返回Excel。
5. 按下 `Alt + F8`,选择你刚刚创建的宏 `HighlightMergedCells`,然后点击 **运行**。
6. 这会自动选择工作表中所有被合并的单元格。
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· TypeScript + Deepseek 打造卜卦网站:技术与玄学的结合
· 阿里巴巴 QwQ-32B真的超越了 DeepSeek R-1吗?
· 【译】Visual Studio 中新的强大生产力特性
· 10年+ .NET Coder 心语 ── 封装的思维:从隐藏、稳定开始理解其本质意义
· 【设计模式】告别冗长if-else语句:使用策略模式优化代码结构