[Resolvido]Comando ao fechar form - abertura de mensagem

Tenho um formulário que tem o seguinte código ao fechar:
Private Sub Form_Close()
If MsgBox("Arquivar documentos emitidos ?", vbYesNo, "ARQUIVO") = vbYes Then
DoCmd.OpenQuery "queryArquivar_Notificações"
DoCmd.OpenQuery "queryEliminar_Notificações"
Exit Sub
Else
   DoCmd.CancelEvent
Exit Sub
End If
End Sub

Pretendia que caso o form não tivesse dados, ou seja estive limpo, não me apresentasse a mensagem de arquivo de documentos e fechasse sem fazer a pergunta e se tivesse carregado fizesse então o procedimento normal.
Agradeço antecipadamente
Obrigado

coloque:

Private Sub Form_Close()
If IsNull(Me.CódigoDoSeuFormulário) Then
DoCmd.Close
Else
If MsgBox("Arquivar documentos emitidos ?", vbYesNo, "ARQUIVO") = vbYes Then
DoCmd.OpenQuery "queryArquivar_Notificações"
DoCmd.OpenQuery "queryEliminar_Notificações"
Exit Sub
Else
DoCmd.CancelEvent
Exit Sub
End If
End If
End Sub

Assunto resolvido
Obrigado