Hi
Can someone tell me where I have gone wrong with this code , I want to delete all rows with values "Total" in column 1
sub delval
Dim zx, t As Integer
Worksheets("Code4conso").Activate
t = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
MsgBox t
For zx = 1 To t
If Range("A" &...