Bonjour,

J'affiche un aperçu des états Access avant impression dans mon programme. Le problème c'est qu'Access ne s'ouvre en taille maximale. Je sais comment maximisé l'état mais pas l'application en elle même. Voici mon code pour le moment :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 Dim oAccess As Access.Application
        ' Démarre une nouvelle instance d'Access pour l'automatisation :
        oAccess = New Access.ApplicationClass()
        ' Ouvre une base de données en mode exclusif :
        oAccess.OpenCurrentDatabase(filepath:=Application.StartupPath & "\mabase.mdb", Exclusive:=True)
        ' Affiche l'aperçu de l'état :
        oAccess.DoCmd.OpenReport("E_fiche_intervention", Access.AcView.acViewPreview)
        oAccess.Visible = True
'maximiser l'état
        oAccess.DoCmd.Maximize()
Merci d'avance