Allo,
Voici une idée,
Placer ce code dans l'évènement change de ton listBox et utiliser un Select Case pour déterminer la suite :
Select Case ListBox Value
Case xyz
UserForm.Hide
Workbooks.Open Filename:='G:\\Controle\\Bases\\fichier1.xls'
Workbooks('Groupes privés_nationaux.xls').Activate
Sheets('Données').Activate
Case abc
UserForm.Hide
Workbooks.Open Filename:='G:\\Controle\\Bases\\fichier2.xls'
Workbooks('Groupes privés_nationaux.xls').Activate
Sheets('Données').Activate
Case efg
UserForm.Hide
Workbooks.Open Filename:='G:\\Controle\\Bases\\fichier3.xls'
Workbooks('Groupes privés_nationaux.xls').Activate
Sheets('Données').Activate
End Select
Évidement, remplacer les emplacements des fichiers par le bon chemin d'accès et les 'cases' par les valeurs possibles du list box.
à tester ....