Ouvrir une feuille excel dans un autre fichier excel

Résolu
jucva Messages postés 27 Statut Membre -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je souhaiterais faire une macro intéger dans un .xlsm

Un bouton permet d'ouvrir l'interface pour choisir un fichier .csv

Mais je ne souhaite pas "ouvrir" à proprement parler, je souhaite que le contenu de sa seule et unique feuille soit copier dans un nouvel onglet du premier fichier contenant la macro.

Pouvez vous m'aider.

Merci

1 réponse

  1.
    f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    fait avec enregistreur de macro excel, a vous d'adapter les noms et chemins 

    Sub Macro2()
    '
    ' Macro2 Macro
    '

    '
        ChDir "D:\_cles"
        Workbooks.OpenText Filename:="D:\_cles\fichier1.csv", Origin:=xlWindows, _
            StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
            ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=False _
            , Space:=False, Other:=False, FieldInfo:=Array(1, 1), _
            TrailingMinusNumbers:=True
        Sheets("fichier1").Select
        Sheets("fichier1").Copy After:=Workbooks("Classeur1").Sheets(3)
        Windows("fichier1.csv").Activate
        ActiveWindow.Close
    End Sub
    0