Close a Excel Workbook when close a userform in Outlook
Thanks, this works:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As
Integer)
Dim XLObject As Object
Set XLObject = GetObject("H:\Outlook\Prosjekt.xls")
XLObject.Close SaveChanges:=True
End Sub
|