Excel VBA指定单元格区域清除内容语法问题求助

你的代码存在两个核心问题，同时补充一个适配数据类型的优化点：

1. Range区域拼接语法错误：你把变量e用引号包裹成了字符串"e"，导致VBA无法识别为行号变量，正确写法是直接拼接变量本身，不需要加引号。
2. 未覆盖需求中的第二个区域：原代码只处理了C(e):L(e)，没实现N(e):V(e)区域的内容清除。
3. 数据类型匹配建议：如果第35列的0是数值类型，用= "0"（字符串匹配）会判断失败，建议改成数值判断= 0；如果是文本型0，则保留字符串判断。

修正后的基础版本代码 #

Dim e As Integer
For e = 14 To 213
    ' 根据实际数据类型选择数值/字符串判断
    If ActiveSheet.Cells(e, 35).Value = 0 Then
        Range("C" & e & ":L" & e).ClearContents
        Range("N" & e & ":V" & e).ClearContents
    End If
Next e

高效合并区域版本（减少VBA与Excel交互次数） #

Dim e As Integer
For e = 14 To 213
    If ActiveSheet.Cells(e, 35).Value = 0 Then
        ' 合并两个区域一次性清除
        Union(Range("C" & e & ":L" & e), Range("N" & e & ":V" & e)).ClearContents
    End If
Next e

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