IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

ouvrir un fichier csv en vba


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Janvier 2009
    Messages
    33
    Détails du profil
    Informations forums :
    Inscription : Janvier 2009
    Messages : 33
    Par défaut ouvrir un fichier csv en vba
    Bonjour,

    Moi j'ai le même problème que nabelou1 dans cette discussion, Excel ouvre mon fichier csv en format texte quand j'utilise une macro ...
    Problème résolu pour lui mais moi mon fichier csv est variable, l'utilisateur doit séléctionner auparavant le fichier comme vous pouvez le voir dans mon code :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    ' on affche la boite de dialogue
    filetoopen = Application.GetOpenFilename("Fichiers texte , *.csv; *.txt", 2, Title, MultiSelect)
     
    'exemple : filetoopen = C:/file/exemple.csv
     
    ' Pour ouvrir , le fichier :
    Workbooks.Open Filename:=filetoopen
    Comment je peux changer mon extension de fichier en txt lorsque mon fichier est une variable (ici : filetoopen)?

    Merci d'avance du coup de main

  2. #2
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Pour ma part j'utilise une autre syntaxe pour ouvrir un txt (ou csv...)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
        Rep = "D:\Rep à moi\"
        'NomFich = Fichier.txt ou Fichier.csv
        Workbooks.OpenText Filename:=Rep & NomFich, DataType:=xlDelimited, _
            Tab:=False, Semicolon:=True
    où semicolon signifie que les séparateurs seront des ";"

Discussions similaires

  1. Réponses: 4
    Dernier message: 30/08/2013, 09h47
  2. [AC-2003] Ouvrir un fichier .csv avec ultraedit en vba
    Par gontrand16 dans le forum VBA Access
    Réponses: 6
    Dernier message: 02/08/2011, 19h54
  3. Ouvrir un fichier CSV en VBA
    Par Sinbad dans le forum VBA Access
    Réponses: 3
    Dernier message: 24/08/2010, 08h06
  4. ouvrir un fichier csv en vba
    Par nabelou1 dans le forum Macros et VBA Excel
    Réponses: 12
    Dernier message: 18/02/2009, 12h52
  5. [VBA-E]Ouvrir un fichier.csv ou un fichier.txt séparateur ";"
    Par ouskel'n'or dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 30/05/2007, 12h09

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo