Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 11/01/2012, 17h31   #1
Invité de passage
 
Homme
Étudiant
Inscription : janvier 2012
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : Canada

Informations professionnelles :
Activité : Étudiant

Informations forums :
Inscription : janvier 2012
Messages : 8
Points : 1
Points : 1
Par défaut importation d'un fichier texte vers excel

J'ai utilisé le code de DarkVader dans cette discussion et pour moi ça fonctionne presque parfaitement! Moi j'ai une date et une valeur dans la colonne suivante. J'aimerais donc avoir 2 colonne dans mon excel en ce moment j'obtient la date et la valeur dans une seul colonne. C'est possible à partir de ce code avec quelque modif??

Citation:
Envoyé par DarkVader Voir le message
Code :
1
2
3
4
5
6
7
8
9
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
et pour l'appel de la procédure
Code :
ImportText "C:\xxxx.txt", Range("A1")
jnthnroy est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 23h24.


 
 
 
 
Partenaires

Hébergement Web