# Deleting Two Columns Simultaneously?

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?