以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 清除excel 中的所有数据 (http://foxtable.net/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 |