Macro d'ouverture

Bonjour,

Lorsque j'ouvre un fichier TEST.XLS

j'execute le code ci dessous, afin que mes usages puissent choisir leur propre fichier. :

Private Sub Workbook_Open()

Dim MyFile As String

MyFile = Application.GetOpenFilename()
Workbooks.Open (MyFile)

'Workbooks(MyFile).Activate

Workbooks.Close

End Sub
Ce fichier est un *.CSV que j'enregistrer plus loin en *.XLS

Une fois ouvert j'aimerais que le workbook actif soit celui choisi par le user

et que le TEST.XLS se ferme par la suite

Je ne suis pas certain de la façon d'indiquer le activate car :

'Workbooks(MyFile).Activate

ne fonctionne pas