Как да деактивирате SaveAs в Ms word във vb.net

Как мога да деактивирам Запазване като в MS word или във всеки друг офис, използващ vb.net?


vba ms-office
person Andrew    schedule 28.09.2012    source източник

Отговори (1)


arrow_upward
1
arrow_downward

Трябва да използвате VBA макрос, за да деактивирате опцията Запазване като. Кодът за деактивиране в Excel е:

 Private Sub Workbook_BeforeSave (ByVal SaveAsUI As Boolean, Cancel As Boolean)

'This macro disables the "Save As" Feature in Excel
'This means that a user will not be able to save this
'workbook(file) under a different name or in a different location
'
'This MUST be placed in "ThisWorkbook" and NOT in a Module.
'

    If SaveAsUI = True Then Cancel = True

End Sub
person djadmin    schedule 28.09.2012