dimples_21188
New Member
- Joined
- Aug 21, 2017
- Messages
- 12
Please could someone help me with the code below, it runs very slow, is there a way to speed it up? Thank you
VBA Code:
Sub HideUnusedRowsInventory()
Dim LR As Long, i As Long
'LR = Range("b" & Rows.Count).End(xlUp).Row
LR = 1468
For i = 129 To 1468
Rows(i).Hidden = Range("b" & i).Value = 0
Next i
Application.ScreenUpdating = True
End Sub