[算表] 复制整本活页簿资料的方法

楼主: yimean (温柔杀手)   2019-07-18 14:33:27
软件:Excel
版本:2013
各位板上的大大下午好。
小弟有一个需求,就是让老板用唯读的方式开启活页簿。
因为这个档案放在服务器上,有同仁需要更新资料,如果老板打开了活页簿,
同仁就无法作业。
我有想过两个解决方案
1.唯读开启,不过这个需要特别的步骤。我担心老板会常常忘记。
2.另外建立一个档案,透过VBA的方式开启时把活页簿所有资料复制一份呈现在
这个档案,关闭后自动清除所有资料。
如果要进行第二点,有两个问题。1.该活页簿的资料页面时会增加,资料也会增加。
请问我要怎么正确的让VBA复制正确的页面数量与资料数量?
2.活页簿关闭时,如何清除所有资料,或不储存资料?
以上,请高手指导。感谢。
作者: soyoso (我是耀宗)   2019-07-18 14:43:00
唯读开启要特别的步骤,是什么步骤,这方面可写批次档batexcel程式后加上/r 路径和开启的完整档案第二点不太了解,页面是什么?如果指的的是 https://i.imgur.com/fDtDlP2.jpg 这个的话这个叫工作表不是页面要复制全部工作表到新活页簿内sheets.copy第二点不明确,活页簿关闭是那个活页簿关闭,原本的?还是新增的?不储存资料方面workbook.close savechanges为false或0如果新增的话vbproject vbcomponents insertline写入到触发事件workbook_beforeclose内就会关闭时不储存资料
楼主: yimean (温柔杀手)   2019-07-19 10:41:00
@s大感谢指导

Links booklink

Contact Us: admin [ a t ] ucptt.com