以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何复制表格线内的内容 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185168) |
-- 作者:lihe60 -- 发布时间:2023/2/8 11:04:00 -- 如何复制表格线内的内容 excel表中,有的内容有表格,有的没有表格线,如何只复制有表格线的内容 下面代码如何写 Dim Wb As MSExcel.WorkBook = eApp.WorkBooks.Open(fl) Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1) \'指定要复制的工作表 Ws.UsedRange.Copy |
-- 作者:有点蓝 -- 发布时间:2023/2/8 11:45:00 -- 遍历所有单元格,判断有没有边框 |