标签:VBA

VBA工程密码移除与保护

‘移除工作表VBA保护
Sub MoveProtect()
  Dim FileName As String
  FileName = Application.GetOpenFilename(“Excel文件(*.xls & *.xla),*.xls;*.xla”, , “VBA破解”)
  If FileName = CStr(False) Then
   Exit Sub
  Else
   VBAPassword FileName, False
  End If
End Sub

[……]

Read more

Excel文档VBA代码自动删除

有时候,不想让自己编写的代码让别人长期使用或换地方使用,又不想让文档自杀,就可以设计限期清除代码,或其他限制条件下清除。具体限制条件可参考作者《Excel文档自杀程序设计》Workbook_Open模块那一部分。代码清除后,与代码有关的程序就不能运行了。[……]

Read more