以文本方式查看主题 - 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=178682) |
-- 作者:lihe60 -- 发布时间:2022/7/15 15:29:00 -- 如何用代码复制excel表中有边框的部分 Dim Wb As MSExcel.WorkBook = eApp.WorkBooks.Open(fl) Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1) \'指定要复制的工作表 Ws.UsedRange.Copy app.ActiveWindow.Selection.paste app.Visible = False Wb.Close
[此贴子已经被作者于2022/7/15 15:29:08编辑过]
|
-- 作者:有点蓝 -- 发布时间:2022/7/15 15:38:00 -- 网上搜了一圈,没找到有关用法 |