Deleting Two Columns Simultaneously?

Question

The following code deletes Column J only: If Application.WorksheetFunction.Sum(Range("J:J").SpecialCells(xlCellTypeVisible)) _ = Application.WorksheetFunction.Sum(Range("L:L").SpecialCells( _ xlCellTypeVisible)) Then Columns("J:J").Delete Shift:=xlToLeft 'instead of .Select and Selection. End If However, I would like to delete both columns `J` and `L` at the same time. How can I do this?

Answer 1

have you tried "Then Columns("J:L").Delete Shift"? Currently you only have column J selected for deletion.