No.1
網(wǎng)絡安全是重點內(nèi)容。無論是生產(chǎn)企業(yè)還是國家事業(yè),互聯(lián)網(wǎng)已經(jīng)成為生活不可分割的一部分。
于是,網(wǎng)絡安全就顯得十分重要,美國的互聯(lián)網(wǎng)是世界最強的國家,面對網(wǎng)絡安全依然無法避免發(fā)生事故。
面對網(wǎng)絡勒索也沒有十足的辦法應對,唯一用贖金來解決問題。
這是一個很明顯的網(wǎng)絡安全事故教訓。
如何做到網(wǎng)絡安全,就不得不提到一些網(wǎng)絡安全方面的管理機制。
本節(jié)主要介紹VBA中一個文本安全模式的問題。
AutomationSecurity是Application對象下的屬性,它表示Microsoft Excel方式打開文件時使用的安全模式。
AtuomationSecurity屬性有三個值可選,分別代表不同的意義,如下圖所示:
名稱 | 值 | 說明 |
msoAutomationSecurityByUI | 2 | 使用 “安全性” 對話框中指定的安全設置。 |
msoAutomationSecurityForceDisable | 3 | 禁用以編程方式打開的所有文件中的所有宏,而不顯示任何安全警告。 |
msoAutomationSecurityLow | 1 | 啟用所有的宏。 此為啟動應用程序時的默認值。 |
上圖為示例界面,可實現(xiàn)對安全模式的返回和設置功能。
安全模式應用于編程中的一些功能性權(quán)限設置。
如有些文件不希望啟用宏,就設置為禁用宏,有些需要啟用可設置開啟。
No.2
代碼
本示例將返回當前的自動安全設置,然后把設置改為禁用宏,顯示 “打開” 對話框;在打開選定的文檔后,將自動安全設回原始設置。
Sub Security()
Dim secAutomation As MsoAutomationSecurity '定義一個安全模式變量
secAutomation = A '保存默認安全模式
A = msoAutomationSecurityForceDisable '不顯示安全警告
A(msoFileDialogOpen).Show
A = secAutomation '恢復安全模式
End Sub
返回當前打開文件安全模式
Private Sub CommandButton1_Click()
MsgBox "當前安全模式值為:" & A
End Sub
AutomationSecurity屬性就介紹到這里。
歡迎關(guān)注、收藏
---END---
1.《關(guān)于禁用宏我想說如何設置Excel文件安全模式,這里有說明,不要錯過》援引自互聯(lián)網(wǎng),旨在傳遞更多網(wǎng)絡信息知識,僅代表作者本人觀點,與本網(wǎng)站無關(guān),侵刪請聯(lián)系頁腳下方聯(lián)系方式。
2.《關(guān)于禁用宏我想說如何設置Excel文件安全模式,這里有說明,不要錯過》僅供讀者參考,本網(wǎng)站未對該內(nèi)容進行證實,對其原創(chuàng)性、真實性、完整性、及時性不作任何保證。
3.文章轉(zhuǎn)載時請保留本站內(nèi)容來源地址,http://f99ss.com/gl/2525903.html