Sélectionner la base access en cours

Bonjour,

J'ai une base access qui me permet de générer des fichiers excel.
En générant le fichier je fais :

xls.Sheets("Feuil1").Select
xls.Range("a13").Value = "N/Réf : AM/SR/" & Me.Initiale.Value
(etc...)
xls.Visible = True
xls.ActiveWorkbook.Saved = True
select case msgbox("Enregistrer le fichier?", vbYesNo)

Sauf que le fichier "actif" est le excel, le msgbox est donc pas visible. il faut revenir sur la base access pour voir le message.

Comment revenir sur le fichier access par vba ?

du genre :

mabaseaccess.Visible = True

J'espère être compréhensible^^

Merci !