if i use the above code
Code:
.Range("A4:W" & Rows.Count).CurrentRegion.Offset(1, 0).SpecialCells(xlCellTypeVisible).Clear
when i type the OFM in the records and run the code, it would produce additional records which are not suppose to be there.
i have attached the excelworksheet below. the error are in red