如何让Excel宏按钮清除指定区域内容时跳过合并单元格

你可以通过遍历目标区域的每个单元格，判断其是否为非合并单元格，仅对这类单元格执行清除操作。修改后的VBA代码如下：

Sub DeleteOnlyUnmerged()
    Dim cell As Range
    ' 遍历指定的单元格区域
    For Each cell In Range("$E$5:$AI$5")
        ' 仅处理未合并的单元格
        If Not cell.MergeCells Then
            cell.ClearContents ' 清除内容（保留单元格格式）
            ' 若只需清空值，也可使用 cell.Value = ""
        End If
    Next cell
End Sub

代码说明 #

• 遍历$E$5:$AI$5区域内的每一个单元格
• 通过MergeCells属性判断单元格是否属于合并区域：合并单元格的MergeCells属性为True，非合并单元格为False
• 仅对非合并单元格执行内容清除操作，合并单元格会被直接跳过，内容保持不变

内容的提问来源于stack exchange，提问作者Iwill Beback