Compilation données fichier avec Userform

[Preskovitch]

Bonjour à tous !

Je souhaite compiler à partir d'une macro les données de plusieurs fichiers (9000 !) dans un seul et même fichier.
Il s'agit d'un simple copier / coller dans un fichier commun.
Jusque là je m'en sortais avec

Temp = Dir(ActiveWorkbook.Path & "\*.xls")
Application.DisplayAlerts = False
Do While Temp <> ""
If Temp <> "FY12 - Pole Soutien - AT Consolidation.xlsm" Then
Workbooks.Open ActiveWorkbook.Path & "\" & Temp

Puis ensuite copier / coller des lignes voulues.


Le hic est que les fichier à compiler (ils sont tous identiques dans leur forme) contiennent des macro dont une lançant une userform à l'ouverture du fichier.
Du coup ma macro est bloquée initiale...
Le fichier qui s'ouvre lance la macro suivante

Sub Workbook_Open()
Load UserForm2
UserForm2.Show
End Sub

Je souhaiterai pouvoir bloquer l'ouverture de cette userform ou bien pouvoir la fermer automatiquement via ma macro initiale.

Est-ce que cela est possible ?

Merci 🙂

 

[Pierrot93]

Re : Compilation données fichier avec Userform

Bonjour,

essaye avec ceci :

Application.EnableEvents = False
'ton code
Application.EnableEvents = True

bonne journée
@+

 

[Preskovitch]

[RESOLU] : Compilation données fichier avec Userform

Yeeeaaahhhhh ça marche nickel.

Merci !