Excel 使用VBA根据不同工作表中的单元格值隐藏工作表中的行

如果称为“计算表”的工作表的单元格H37的值低于15000，我试图隐藏称为“RS”的工作表的第24行到第26行

我曾尝试在VBA中使用/组合公式，就像以前我个人使用的那样&在这个论坛上，但没有成功。我对if函数不是很确定

提前感谢你的帮助。

---

Abs

如果“计算字段”表上的

H37

大于等于15000，则如果您不需要发生任何事情，则应该使用类似的方法

Sub test()

If Sheets("calculation sheet").Range("H37").Value < 15000 Then

Sheets("RS").Rows("24:26").EntireRow.Hidden = True

End If

End Sub

子测试（）
如果图纸（“计算书”）范围（“H37”）值小于15000，则
图纸（“RS”）。行（“24:26”）。EntireRow.Hidden=True
如果结束
端接头

如果“计算字段”表上的

H37

大于等于15000，您不需要任何事情发生，那么应该使用类似的方法

Sub test()

If Sheets("calculation sheet").Range("H37").Value < 15000 Then

Sheets("RS").Rows("24:26").EntireRow.Hidden = True

End If

End Sub

子测试（）
如果图纸（“计算书”）范围（“H37”）值小于15000，则
图纸（“RS”）。行（“24:26”）。EntireRow.Hidden=True
如果结束
端接头

将此代码放在“计算表”的

工作表

模块中

每次在计算书上进行计算时，都会触发此代码

Private Sub Worksheet_Calculate()

    Worksheets("RS").Rows("24:26").EntireRow.Hidden = Me.Range("H37").Value < 15000

End Sub

Private子工作表_Calculate（）
工作表（“RS”）。行（“24:26”）。EntireRow.Hidden=Me.Range（“H37”）。值<15000
端接头

将此代码放在“计算表”的

工作表

模块中

每次在计算书上进行计算时，都会触发此代码

Private Sub Worksheet_Calculate()

    Worksheets("RS").Rows("24:26").EntireRow.Hidden = Me.Range("H37").Value < 15000

End Sub

Private子工作表_Calculate（）
工作表（“RS”）。行（“24:26”）。EntireRow.Hidden=Me.Range（“H37”）。值<15000
端接头

我认为这不能通过公式实现。您需要使用代码。什么时候应该执行宏？这就是我试图做的，这就是为什么它在标题中说使用VBA:）也许下次尝试插入您拥有的代码和不起作用的代码…我认为这不能通过公式实现。您需要使用代码。什么时候应该执行宏？这就是我试图做的，这就是为什么它在标题中说使用VBA:）也许下次尝试插入您拥有的代码和不起作用的代码…如果值超过15000，我不需要它做任何事情。上面的公式似乎对我不起作用。如果值超过15000，我不需要它做任何事情。以上公式似乎对我不起作用。谢谢。它不起作用，我看不出您的代码中有哪一部分会转到名为“RS”的工作表以隐藏第24:26行？您上面提供的代码是否仍保留在同一工作表（称为“计算表”）中。H37是由一个公式驱动的，您是对的。@Abigal-请参阅我的编辑。我忽略了“RS”表。它对我仍然不起作用。为什么它被称为“工作表计算（）”。即使我在H37中键入一个数字而不是保留初始公式，它也不会做任何事情。@Abigal如果您手动键入一个数字，则需要使用

工作表更改
事件。您可以通过谷歌Excel工作表事件阅读更多信息。我删除了
工作表\u Change
事件代码，因为您说它是公式驱动的（这意味着只有计算才会引起更改）。如果您需要
工作表\u更改
事件，请通知我。另外，
H37
中的公式是否链接到另一张表？@Abigal-我很高兴你告诉我它对我有效。请勾选绿色复选标记，将问题标记为已回答，以便其他人知道这是一个有效的解决方案，继续前进。谢谢。它不起作用，我看不出您的代码中有哪一部分会转到名为“RS”的工作表以隐藏第24:26行？您上面提供的代码是否仍保留在同一工作表（称为“计算表”）中。H37是由一个公式驱动的，您是对的。@Abigal-请参阅我的编辑。我忽略了“RS”表。它对我仍然不起作用。为什么它被称为“工作表计算（）”。即使我在H37中键入一个数字而不是保留初始公式，它也不会做任何事情。@Abigal如果您手动键入一个数字，则需要使用
工作表更改
事件。您可以通过谷歌Excel工作表事件阅读更多信息。我删除了
工作表\u Change
事件代码，因为您说它是公式驱动的（这意味着只有计算才会引起更改）。如果您需要
工作表\u更改
事件，请通知我。另外，
H37
中的公式是否链接到另一张表？@Abigal-我很高兴你告诉我它对我有效。请勾选绿色复选标记，将问题标记为已回答，以便其他人知道这是一个有效的解决方案，继续前进。