Importer fichier txt Résolu/Fermé

Question

Bonjour tout le monde,
Je recherche à automatiser l'import d'un fichier txt sous excel avec un traitement de celui-ci derrière. Etant débutante sous Excel je fait appel à votre aide.
Voici les fichiers en questions (mon document txt + mon fichier excel):
http://cjoint.com/?3DipgEwx2Sk

Cordialement.
Claire.

cs_Le Pivert · Answer

Bonjour,

Pour importer un fichier texte dans Excel on utilise vba.

faire Alt F11 pour accéder à l'éditeur, ensuite Insertion UserForm ajouter un bouton de commande.
Double cliquer sur ce bouton et mettre ce code:

Option Explicit
Private Sub CommandButton1_Click()
ImportText "C:\Chemin complet fichier.txt", Range("A1")
End Sub
Sub ImportText(FileName As String, PosImport As Range)
    Dim QT As QueryTable
    Set QT = ActiveSheet.QueryTables.Add(Connection:="TEXT;" & FileName, Destination:=PosImport)
    With QT
        .TextFileSemicolonDelimiter = True
        .TextFileTextQualifier = xlTextQualifierDoubleQuote
        .Refresh
    End With
End Sub

ozone_ · Answer

Salut,

Voici une ébauche pour extraire tes données :
 
 http://www.cjoint.com/data3/3DireKSiowm.htm

Maurice · Answer

Bonjour

avec une mouvelle macro
http://cjoint.com/?3DivIcmziSX

A+
Maurice