在很多企事業(yè)單位，處于商業(yè)機(jī)密保護(hù)的需要，常常需要禁止一些文件格式的“另存為”功能，防止通過“另存為”將文件另行保存，據(jù)為己有的目的；尤其是在局域網(wǎng)中訪問服務(wù)器共享文件的時候，常常需要禁止將共享文件另存為本地，防止將服務(wù)器共享文件泄露出去。尤其是對常見的Word、Excel和一些圖片格式的文件，必須有效禁止其另存為的功能，以保護(hù)文件安全。

?

那么，企事業(yè)單位如何實(shí)現(xiàn)禁止Word另存為、禁止圖片另存為、禁止Excel另存為呢？筆者認(rèn)為，這一方面可以借助于專門的文件保護(hù)軟件，尤其是一些“共享文件夾管理軟件”、“共享文件加密軟件”等，通過將共享文件進(jìn)行加密保護(hù)的方式，禁用上述文件的“另存為”功能；另一方面也可以借助一些技術(shù)方法（如宏命令或文件格式轉(zhuǎn)換）來實(shí)現(xiàn)。

?

一、通過宏命令禁止Word另存為、實(shí)現(xiàn)Excel禁止另存為、禁止圖片另存為本地磁盤

?

1、使用Word模板、微軟接口、Word插件來禁用Word另存為

?

1）建立WORD模板，在模板中寫宏代碼，重載FileSaveAs方法，在此方法里邊不要寫任何代碼，如：sub FileSaveAsend sub用代碼讓操作的WORD加載此模板。

?

此方法的前提是：宏安全性設(shè)置為中或低。

?

2）使用微軟接口，將按鈕灰掉或不可見

?

灰：設(shè)置菜單的Enabled，屬性為false

?

不可見：設(shè)置菜單的Visible，屬性為false

?

此方法缺點(diǎn)：在出現(xiàn)異常時會修改本地的normal模板，造成所有文件都不可用另存為按鈕。

?

3）制作word插件

?

類似于第一種方法，只不過是寫word插件，在插件中重載另存事件。

?

此方法和第一種方法相比，沒有宏安全性的限止。

?

三種方法，第1種最簡單；第3種最好；第2種有BUG，但也是一般人常用的方法。

?

2、Excel禁止另存為、禁用Excel另存為功能

?

在宏編輯器里的ThisWorkBook下寫入代碼：

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Me.Saved = True
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = True
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If SaveAsUI = True Then Cancel = True
End Sub

文件打開什么樣子，關(guān)閉時將不會有任何變化。

?

3、禁止圖片另存為

?

這種情況一般是通過將圖片轉(zhuǎn)化成flash的方式來阻止用戶將圖片另存為本地，或者即便另存為了也無法修改圖片，畢竟是動態(tài)的flash了。網(wǎng)上有很多專門將圖片轉(zhuǎn)化為flash的軟件，如Ailt PNG to SWF。

創(chuàng)作挑戰(zhàn)賽新人創(chuàng)作獎勵來咯，堅(jiān)持創(chuàng)作打卡瓜分現(xiàn)金大獎

總結(jié)

以上是生活随笔為你收集整理的禁止word另存为,禁止图片另存为excel禁止另存为的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。