Ouverture Excel avec formulaire

Bonsoir tout le monde,
Pour expliqué mon problème précisément, quand je lance mon fichier A, il lance mon formulaire et cache toutes les feuilles du fichier, ainsi que tout fichiers ouvert avant, comme cela on peux qu'utilisé que les formulaires associer au fichier A, mais voila si je veux ouvrir un autre fichier Excel B ou s'il est déjà ouvert je ne peux plus le fichier B car il n'est plus visible. Cela vas aussi jusqu'à me provoqué une erreur dans l'enregistrement dans l'un de mes formulaire qui serais ouvert.

bonjour
J'en suis pas certain que j'ai bien compris la demande mais une tentative :
sur ton formulaire tu insère un bouton associé à : (à adapter le nom de ton USF)

Code:

---

Unload UserForm1

---

bonjour, je vous donne un bout de mon code du formulaire qui s'ouvre en 1er lors de l'ouverture de mon fichier.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

Private Sub Admin_Click() Unload Me Connexion.Show End Sub   Private Sub Quitter_Click() ActiveWorkbook.Save Application.Quit Unload Me 'Fermer le formulaire Accueil. End Sub   Private Sub UserForm_Initialize() 'Au démarrage du formulaire Accueil. Me.DateDuJour = Date 'Cela permet de mettre la date du jour en haut à gauche sous le titre de la page.   End Sub   Private Sub Valider_Click() Unload Me GestFiche.Show End Sub

---

c'est là que tout les autres fichier(s) Excel ouvert disparaisse ; si j'ai le malheur de vouloir ouvrir un autre fichier j'ai un message d'erreur ou rien ne s'ouvre.

bonjour
tu quitte Excel lors de fermeture alors tu peux simplement enregistrer et fermer le fichier
je crois que c'est à cause de :

Code:

---

Application.Quit

---

supprime cette instruction et voir le résultat

Citation:

---

Envoyé par BENNASR

bonjour
tu quitte Excel lors de fermeture alors tu peux simplement enregistrer et fermer le fichier
je crois que c'est à cause de :

Code:

---

Application.Quit

---

supprime cette instruction et voir le résultat

---

bonjour,
j'ai désactiver le

Code:

---

Application.Quit

---

, mais si j'ouvre un autre fichier pas de soucis, mais je ne peux y accédé pour le modifier, même soucis si j'ai déjà un autre fichier d'ouvert, je ne peux le modifier.

Bonjour, pourriez vous nous montrer le code qui vous permet de cacher tous les fichiers excel ouvert. je pense qu'il vous faudrait avant Application.quit remettre les documents ouverts visible , ainsi en fermant automatiquement

Code:

---

1 2 3 4 5 6 7 8

Private Sub Quitter_Click() ActiveWorkbook.Save ' Visibilité des documents déjà ouverts ' retour sur document initial   ActiveWorkbook.Close Unload Me 'Fermer le formulaire Accueil. End Sub

---

8-)Cordialement

Bonsoir,

voici le code qui se trouve dans "ThisWorkbook"

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub Workbook_BeforeOpen() Application.EnableEvents = False Dim App As Excel.Application Set App = New Excel.Application App.Visible = True App.Workbooks.Open (ThisWorkbook.Path & "\" & ThisWorkbook.Name) ThisWorkbook.Close Application.EnableEvents = True End Sub

---