Villalobos
New Member
- Joined
- Sep 5, 2013
- Messages
- 44
Hello, Could somebody help me what would be the MS Word vba equivalent of this excel "kill me" code? Thanks in advance the reply.
Code:
Option Explicit
Private Sub Workbook_open()
If date > “2014.07.14” then
With ThisWorkbook
.Saved = True
.ChangeFileAccess xlReadOnly
Kill .FullName
Application.Quit
End With
End if
End Sub