Comment ouvrir un second fichier excel via VBA

Bonjour

je vous explique la situation

j'ai une base de donné sous Excel et je dois permettre à mes équipes d'y accéder sans avoir accès aux données de base.

pour la gérer, j'utilise des userforms (l'accès aux onglets est bien sur "bloqué" afin d'éviter que quelqu'un puisse y accéder)

dans l'un des userforms, je permets la création d'un fichier excel qui récupère des données saisies dans le userform. dès qu'on quitte le userform, le fichier excel est sauvegardé et fermé

Jusque là, rien de bien particulier.

Voilà ce que je voudrais :

une fois que mon fichier excel créé via le userform est enregistré, je voudrais que l'utilisateur puisse y acceder sans quitter le userform.

mais impossible de le faire... je n'y arrive pas !

je ne sais même pas si c'est possible car j'ai essayé pendant que je suis sur le userform d'ouvrir manuellement un autre fichier excel, mais rien ne s'ouvre tant que je n'ai pas quitter le userform

quelqu'un peut m'aider ?

merci d'avance

Bonjour, il est possible d'ouvrir un classeur excel à partir du userform, mais ensuite aucune interaction n'est possible avec le classeur tant que le userform est ouvert, celui-ci conserve le focus.
Tu peux tester par toi-même en affectant cette macro à un bouton.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub CommandButton1_Click() Dim cheminFichier As String cheminFichier = "chemin_vers_le_fichier\mon_fichier_cree.xlsx" ' Remplacez ceci par le chemin complet de votre fichier créé   On Error Resume Next Workbooks.Open cheminFichier If Err.Number <> 0 Then MsgBox "Une erreur s'est produite lors de l'ouverture du fichier.", vbExclamation End If On Error GoTo 0 End Sub

---

on doit pouvoir en créant, ouvrant une nouvelle session Excel, de la même façon qu'on peut ouvrir un word

Code:

---

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

Sub OvrirClasseurDansNouvelleInstanceExcel() 'par: https://excel-malin.com   On Error GoTo Erreur   'définitions des variables Dim MonClasseur As String Dim objExcel As Excel.Application Set objExcel = CreateObject("Excel.Application")   'définition du Classeur à ouvrir MonClasseur = "C:\Test\ClasseurTest.xlsm"   'ouverture du Classeur dans une nouvelle instance d'Excel objExcel.Workbooks.Open Filename:=MonClasseur objExcel.Visible = True   Exit Sub Erreur: MsgBox "Une erreur est survenue..."<span data-mce-type="bookmark" style="display: inline-block; width: 0px; overflow: hidden; line-height: 0;" class="mce_SELRES_start"></span> End Sub

---

Bonjour,

par défaut un userform est modal, c'est à dire qu'il fige l'application tant qu'on ne le ferme pas (entre autre)

ils suffit de le rendre non modal, et on peut ouvrir d'autres classeurs, travailler dessus, avec le userform ouvert

Code:

---

Userform1.Show False

---