Hi,
Im struggling with this code:
The code hides everything from the last found value and does not care what the value is.
Can someone help me please?
Im struggling with this code:
Code:
On Error Resume Next</SPAN></SPAN>
Dim PSL As Long</SPAN></SPAN>
Dim i As Long</SPAN></SPAN>
Dim y As Variant</SPAN></SPAN>
PSL = Range("T" & Rows.Count).End(xlUp).Row</SPAN></SPAN>
For Each y In Range(PSL)</SPAN></SPAN>
If Sheets("ProjectRegister").Cells("T" & i).SpecialCells(xlCellTypeConstants).Value = "Completed" _</SPAN></SPAN>
And Sheets("ProjectRegister").Cells("Z" & i).SpecialCells(xlCellTypeConstants).Value = "Yes" _</SPAN></SPAN>
Then Sheets("ProjectRegister").Rows(i).Hidden = True</SPAN></SPAN>
Next y</SPAN>
The code hides everything from the last found value and does not care what the value is.
Can someone help me please?