关于EXCEL删除列的问题

Question

将MSHflexgrid中的数据导入excel后，如何用VB代码删除不需要的列？

Answer 1

dim exc as new excel.application
dim vWork as excel.workbook
dim vSheet as excel.worksheet
set vwork=exc.workbooks.add
set vsheet=exc.worksheet(1)
vsheet.activate
    vsheet.Columns("C:C").Select
    exc.Selection.Delete Shift:=xlToLeft

Answer 2

xlsSheet.Columns("B:B").Delete Shift:=xlToLeft '刪除B列