以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] excel复制 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=186963) |
-- 作者:leoli -- 发布时间:2023/6/11 19:34:00 -- [求助] excel复制 老师, 表问如何将C:/text.xlsx中sheet1表中全部内容 复制到C:/text1.xlsx 的sheet2中 (如sheet2中的内容不询问全部替换掉,包括多余内容) 用按钮代码实现,谢谢。
|
-- 作者:有点蓝 -- 发布时间:2023/6/11 20:34:00 -- 删除C:/text1.xlsx 的sheet2:http://www.foxtable.com/webhelp/topics/1465.htm、或者使用vba:http://www.foxtable.com/webhelp/topics/2121.htm 然后复制:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=175599
|
-- 作者:leoli -- 发布时间:2023/6/13 12:07:00 -- 老师,可以不删除原来的表sheet2, 可以用清除sheet2中的内容吗 ? |
-- 作者:有点蓝 -- 发布时间:2023/6/13 12:10:00 -- 清除sheet2中的内容,和删除后重新添加一个有什么区别? |
-- 作者:leoli -- 发布时间:2023/6/13 20:39:00 -- 老师,我的是xlsx,如下不行 Dim Book As New XLS.Book("c:\\reports\\test.xls")
Book.Sheets.RemoveAt(0) |
-- 作者:有点蓝 -- 发布时间:2023/6/13 20:42:00 -- Dim Book As New XLS.Book("c:\\reports\\test.xlsx") |
-- 作者:leoli -- 发布时间:2023/6/14 12:52:00 -- 老师,改成这样,sheet1表还是存在的 Dim Book As New XLS.Book("c:\\reports\\test1.xlsx") Book.Sheets.RemoveAt (0) |
-- 作者:有点蓝 -- 发布时间:2023/6/14 13:27:00 -- 没有保存 |
-- 作者:leoli -- 发布时间:2023/6/14 13:34:00 -- 老师,要怎样保存 ? |
-- 作者:有点蓝 -- 发布时间:2023/6/14 13:35:00 -- http://www.foxtable.com/webhelp/topics/1151.htm |