Excel VBA - 如何引用单元格的可见内容而不是其公式?

Nat*_*ate 3 excel vba excel-vba

我正试图在我的Excel电子表格(("B13:B65")中循环浏览特定范围,具体而言)并隐藏其中包含"X"的所有行.像这样的东西:

For i = 13 to 65
If Cells(i, 2) = "x" Or "X" Then Rows(i).RowHeight = 0
Next i
Run Code Online (Sandbox Code Playgroud)

问题是我遇到了类型不匹配错误.

我认为这种情况正在发生,因为此范围内的所有单元格都是公式而不是文本字符串.例如,单元格B13的内容是:

='Monthly'!$C$13
Run Code Online (Sandbox Code Playgroud)

我希望我的代码评估单元格的可见输出,而不是实际内容.

我觉得这里有一个非常简单的解决方案,但我一直在寻找一段时间没有成功.我是菜鸟,显然......

Hug*_*tte 5

基于此示例:https://msdn.microsoft.com/en-us/library/office/ff195193.aspx

Sub Main()

For Each c in Worksheets("Sheet1").Range("A1:D10")    'Change for your range
 If Lcase(c.Value) = "x" Then 
 '''Rest of your code
 End If 
Next c

end sub
Run Code Online (Sandbox Code Playgroud)