R Ron de Bruin Oct 27, 2004 #2 Use this James On Error Resume Next Rows("1:1").Cells.SpecialCells(xlCellTypeBlanks)...................... On Error GoTo 0
Use this James On Error Resume Next Rows("1:1").Cells.SpecialCells(xlCellTypeBlanks)...................... On Error GoTo 0