Código Delphi [-]worksheet.Range['B1','B1'].EntireColumn.Delete(null);
worksheet.Range['B1','B1'].EntireColumn.Delete(null);