Discussion :

[laurent00]

salutation
j'ai un bouton dans un formulaire "pleine page" qui ouvre un autre formulaire, ce dernier s'ouvre automatiquement en pleine page
je souhaiterai qu'il s'ouvre en fenêtre réduite et si possible près du bouton qui l'a ouvert
merci Laurent

[Invité]

Bonjour

Pour réduire la fenêtre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
DoCmd.Minimize

ensuite pour la déplacer c'est

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
DoCmd.MoveSize

Pour les paramètres du movesize, il faut récupérer la postion du bouton dans son formulaire (pas évident) pour les passer en paramètre

Starec

[laurent00]

ok mais il me la réduit entièrement amors que je veux qu'elle reste dans une fenêtre
voici le code

Private Sub Interventions_Click()
On Error GoTo Err_Interventions_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "F-Interventions"

stLinkCriteria = "[N° Batiment]=" & Me![N° Batiment]
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Minimize

Exit_Interventions_Click:
Exit Sub

Err_Interventions_Click:
MsgBox Err.Description
Resume Exit_Interventions_Click

End Sub

[FreeAccess]

Bonjour,

Pour les paramètres du movesize, il faut récupérer la postion du bouton dans son formulaire (pas évident) pour les passer en paramètre

Peut-être voir la solution que proposée argyronet...
http://argyronet.developpez.com/offi...etformtoright/

Bonne lecture