Dear Sir

We need your help
Each day we do thousand of sheets like as follow workdone.
We need to count the latest 15 records. For more than 15 records, we delete as
Yellow color row. That is the old record we need to delete. For less than 15 records,
We delete the yellow color row. After VBA code, The final result should be same as file named after. Attached pls find two file name before ,after

The vba code don’t work…pls help..many thanks

lastRow = Cells(Rows.Count, 1).End(xlUp).Row
For z = 1 To lastrow


If (Cells(z, ("c"))) = "" Then Cells(z, ("c")).EntireRow.Clear
Next z

Many Thanks
Tom

Attached Files

	AFTER.xls (37.0 KB, 17 views)
	BEFORE.xls (32.0 KB, 16 views)