强制另存为,MS Excel VBA

Question

我在MS Office产品中对VBA有点新意.我一直在搜索一些代码,这些代码会强制用户"另存为"我用作模板的.xls文件(但它不是实际的模板文件类型)

基本上,我有这个:

1. 用户打开.xls,将某些数据输入某个字段,然后将文件 - >另存为自己的位置
2. 有时用户点击保存,因此覆盖我不想发生的.xls.

我一直在研究一些想法,但我不确定如何最好地实现它.我认为用户首次打开.xls以保存到新位置时的提示是最好的方法,但是如果他们已经将文件保存到新位置并决定编辑新位置,我想要他们能够在那时'保存',因为现在它是他们自己的文件,而不是原始文件.

如果有人可以指出我正确的方向或在我的逻辑中发现缺陷,我很乐意听到它.

谢谢,迈克

Answer 1

我用作模板(但它不是一个实际的模板文件类型)

最简单的方法是将文件Read-Only Recommended设置为true.查看快照

即使用户试图这样做Save,Excel也会自动提示输入Save As

HTH