时间戳

首页 > 解决方案 > 循环遍历范围并清除正在评估的单元格下方 8 个单元格的内容

excel - 循环遍历范围并清除正在评估的单元格下方 8 个单元格的内容

问题描述

我想循环通过单元格 $C$29 到 $G$29，如果单元格包含空格，我想清除下面 8 个单元格的内容。比如$G$29为空，我想清除$G$30:$G$37中的内容。我在下面附上了代码。但我认为 .ClearContents 行有问题，这与我尝试相对引用的方式有关。谢谢！

最好的，米

Sub Hide_Financing()

Dim r As Range

For Each r In Sheet2.Range("$C$29:$G$29")
    If r.Value = "" Then
        Sheet2.Range(r.Address & ":" & r.Offset(rowOffset:=8).Address).ClearContents
    End If
Next r

End Sub

标签： excelvba

解决方案

这对我来说可以。在您的代码中，您没有设置“sheet2”的值。你设置正确了吗？您的其余代码是正确的。另一个问题，你确定你已经清除了 "$C$29:$G$29" 范围内的至少一个单元格吗？

推荐阅读