以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  清除excel 中的所有数据  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=70306)

--  作者：kunmails --  发布时间：2015/6/18 16:47:00 --  清除excel 中的所有数据 如何通过命令清除excel 表中的所有数据！

--  作者：大红袍 --  发布时间：2015/6/18 16:54:00 --   Dim App As New MSExcel.Application Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\\test.xls") Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1) ws.Cells.Select app.Selection.ClearContents app.visible = True