Lukke efter Macro ?

Jeg har denne makro her...

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    FileSave
    Cancel = True
End Sub

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    FileSave
    ThisWorkbook.Close
End Sub


Hvor sidst i FileSave() der står

    Sheets.Copy
    ActiveWorkbook.SaveAs strSaveQF25


Mit spørgsmål går så på, om man kan få begge vinduer til at lukke ned når man har trykket på Print ?
(Der bliver åbnet en kopi af det aktuelle vindue som er smidt et andet sted på serveren udfra kriterier i makroen) ..