Macro ouverture fichier Excel

Bonjour,

J'ai un petit soucis dans une nouvelle macro que je dois faire.

Je dois créer une macro qui va chercher et ouvrir un fichier excel dans un dossier pour copier le contenu de la feuille 1 de ce fichier vers un autre classeur. Le fichier excel à ouvrir n'aura pas le même nom (il y en aura a peu près 200 différents).

Etant débutant, je galère un peu à trouver la solution

Je ne sais pas si je suis assez clair. Si c'est pas le cas, je peux essayer de vous détailler le problème

Merci d'avance pour votre aide

Bonjour,

Tu peux essayer avec ce code.

Sub OuvreFichier()
    ChDrive "C:\"
    ChDir "C:\Excel\"
    FileNew = Application.GetOpenFilename("Fichiers Excel (*.xls), *.xls", , "Ouvrir le fichier Excel désiré ...")
    If FileNew = "Faux" Then End
    Workbooks.Open FileNew
    ' ... SUITE DU CODE ....
End Sub