1
我試圖自動隱藏在K3中自動隱藏K17到K17的行。我發現這個代碼,我一直在試圖篡改工作,但它似乎總是隱藏列中的每個空單元格,而不是特定的範圍。如何隱藏基於單元格值的行的範圍
Private Sub Worksheet_Calculate()
Dim LastRow As Long, c As Range
Application.EnableEvents = False
LastRow = Cells(Cells.Rows.Count, ""K"").End(xlUp).Row
On Error Resume Next
For Each c In Range(""K3:K17"" & LastRow)
If c.Value = 0 Then
c.EntireRow.Hidden = True
ElseIf c.Value > 0 Then
c.EntireRow.Hidden = False
End If
Next
On Error GoTo 0
Application.EnableEvents = True
End Sub"
這甚至編譯雙雙引號? – arcadeprecinct