Discussion :

[Begon0]

Bonjour

lorsque j'ouvre une fenêtre indépendante à partir d'une autre fenêtre indépendante, celle-ci apparait en arrière plan au lieu d'apparaitre en premier plan
cela marchait très bien sous Access 2003

de quoi cela peut-il venir ?

[Tofalu]

Bonjour

Peut être que la première est ouverte en mode modal ?

[Begon0]

non elle est bien en mode indépendant
pour le moment je réduis la première fenêtre pour contourner le problème mais j'aimerai bien que ça marche comme avant

je vais regarder si je peux redonner le focus à la 2ème fenêtre

[Begon0]

le fait de forcer le focus sur le 2ème formulaire ne change rien

par contre si je met en mode modal, là ça marche mais ce n'est pas ce que je veux, je veux toujours avoir accès aux autre formulaires sans devoir fermer celui-ci

[Begon0]

il semblerait que le problème ne survienne que sur le double clic du textBox
si j'ouvre le 2ème formulaire à partir d'un clic ou d'un mouse_up ou à partir d'un autre composant du formulaire, ça marche

ce code fonctionne même s'il est moins élégant et moins logique que le double-clic :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Option Compare Database
Dim MonTag As Boolean
 
Private Sub Form_Load()
MonTag = False
End Sub
 
Private Sub Form_Timer()
    MonTag = False
End Sub
 
Private Sub Texte0_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
 If MonTag = False Then
    MonTag = True
Else
    DoCmd.OpenForm "f2"
    MonTag = False
End If
End Sub

j'ai l'impression que le double-clic exécute bien le code mais qu'après il redonne le focus au texbox

[Begon0]

en donnant le focus à un autre contrôle du premier formulaire, le 2ème formulaire reste au premier plan

je pense que je vais en rester là

Code :

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

1
2
3
4
Private Sub Texte0_DblClick(Cancel As Integer)
    DoCmd.OpenForm "f2"
    btn1.SetFocus
End Sub

si jamais quelqu'un trouve autre chose je suis preneur