[XL-2010] Ouverture d'un classeur depuis un autre - Userform [Résolu]

[AidezMoiSvp]

Bonsoir,

Soit 2 classeurs.
Depuis le 1 j'ouvre le 2.
A l'ouverture de 2, 1 se ferme.
Problème : Mon USF dans le fichier 2 ne s'affiche pas.


Code utilisé pour fermer 1 :

Code :

1
2
3
4
5
6
Dim fichier As String
Dim Wb As Workbook
UserForm5.Hide
fichier = Mypath & "\" & Selection.Offset(0, 2).Value & "\" & Selection.Offset(0, 2).Value & ".xls"
Set Wb = Workbooks.Open(Filename:=fichier)
End If

Mon code d'ouverture de 2 :

Code :

1
2
Call FermetureNavigSiOuvert
UserForm15.Show

Code :

1
2
3
4
5
6
7
8
9
10
Sub FermetureNavigSiOuvert()
Dim Wb As Workbook
 
On Error Resume Next
Set Wb = Workbooks("00_Navigation.xls")
On Error GoTo 0
 
'True spécifie que les modifs sont sauvegardées
If Not Wb Is Nothing Then Wb.Close True
End Sub

Merci

[jfontaine]

Bonjour,

Pour que ca fonctionne, il te faut ouvrir ta Userform en non modal

Code :

UserForm15.Show 0

[AidezMoiSvp]

ça ne change rien.
Je pense que le problème vient du fait que le fichier qui s'ouvre perd le focus en fermant le fichier ouvert...
Mais je ne vois pas comment empêcher cette perte de focus.
Si quelqu'un a une idée.

[AidezMoiSvp]

Résolu !