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

Question

我正在尝试隐藏名为“计算表”的工作表的单元格H37的值低于15,000的工作表的第24至26行

我曾尝试在VBA中使用/组合公式，如以前在本论坛上以及本论坛上个人使用的那样，但是它没有用。 我不太确定if函数。

预先感谢您的帮助。 腹肌

Answer 1

如果“计算字段”工作表上的H37 > = 15,000，如果您不需要进行任何操作，则应执行类似的操作

Sub test()

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

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

End If

End Sub

Answer 2

将此代码放在“计算表”的Worksheet模块中。

每次在“计算表”上进行计算时，都会触发此代码。

Private Sub Worksheet_Calculate()

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

End Sub