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 :

xls en csv par macro


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Mars 2007
    Messages
    136
    Détails du profil
    Informations forums :
    Inscription : Mars 2007
    Messages : 136
    Par défaut xls en csv par macro
    Bonjour,

    Lorsque je transforme manuellement un fichier Excel en csv, il conserve le même aspect (colonnes) qu'en excel, et il s'importe sans problème dans Access.
    Lorsque j'effectue la même opération par une macro

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ActiveWorkbook.SaveAs Filename:= "fichier.csv" , FileFormat:=xlCSV, CreateBackup:=False
    le format du fichier csv n'est plus le même (séparation par des virgules), et je ne parviens plus à l'importer dans Access.

    Quelqu'un aurait-il une solution ?

  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
    Depuis Access, tu peux directement importer une feuille de calculs Excel en tant que table. Pourquoi ne pas plutôt utiliser cette méthode ?

  3. #3
    Membre confirmé
    Inscrit en
    Mars 2007
    Messages
    136
    Détails du profil
    Informations forums :
    Inscription : Mars 2007
    Messages : 136
    Par défaut Ca me convient moins bien
    Lorque j'importe un fichier Excel, je ne peux pas définir de spécificités d'importation

  4. #4
    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
    Ça m'étonne beaucoup, il me semble pourtant l'avoir fait souvent... Il semble me souvenir qu'il peut y avoir un pb de format de dates mais je l'avais réglé... donc c'est possible... Mais je ne pratique plus depuis plus d'un an et je ne me souviens pas de problème
    Je te laisse avec les "espécialistes" d'Access, mais tu devrais peut-être poser la question sur le forum Access.
    Bonne chance

  5. #5
    Membre confirmé
    Inscrit en
    Mars 2007
    Messages
    136
    Détails du profil
    Informations forums :
    Inscription : Mars 2007
    Messages : 136
    Par défaut merci
    En tout cas, c'est très sympa d'avoir cherché..

    Je vais suivre ton conseil, je vais aller voir du côté d'ACCESS

  6. #6
    Membre chevronné

    Profil pro
    Inscrit en
    Octobre 2004
    Messages
    453
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2004
    Messages : 453
    Par défaut
    Tu peux toujours te faire un fichier text pour chaque feuille en VBA dans lequel tu inclues tes spécificités comme tu l'entends.

    Quelque chose dans le genre de :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    Dim fnum As Integer
    Dim rng As Range
    Dim r As Range
    Dim c As Range
    Dim ffichier As String
     
    ffichier = "C:\..."
    Set rng = Sheets(mafeuille).UsedRange
    fnum = FreeFile()
    Open ffichier For Output As #fnum
    For Each r In rng
        For Each c In r.Resize(1,rng.Columns.Count)
            Print #fnum c.Value & ","
        Next c
        Print #fnum vbCrLf
    Next r
    Close fnum

  7. #7
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Citation Envoyé par jnmab Voir le message
    Bonjour,

    le format du fichier csv n'est plus le même (séparation par des virgules), et je ne parviens plus à l'importer dans Access.
    Quel est le séparateur de liste dans les options régionales du panneau de configuration de Windows ?

    Citation Envoyé par jnmab Voir le message
    Lorque j'importe un fichier Excel, je ne peux pas définir de spécificités d'importation
    Exact

  8. #8
    Membre confirmé
    Inscrit en
    Mars 2007
    Messages
    136
    Détails du profil
    Informations forums :
    Inscription : Mars 2007
    Messages : 136
    Par défaut
    Bonjour,

    Ouskel'nor : oui, je suis allé voir côté Access, mais je n'ai pas eu de réponse. Si c'est le cas, je ne manquerai pas de vous en faire profiter.

    Je vais essayer le code de Kiki29, et regarder aussi mes paramètres régionaux, on ne sait jamais...

  9. #9
    Membre confirmé
    Inscrit en
    Mars 2007
    Messages
    136
    Détails du profil
    Informations forums :
    Inscription : Mars 2007
    Messages : 136
    Par défaut gagné !
    merci à tous !

    Me voilà avec une épine de moins dans le pied..

    La suggestion de kiki29 s'est avérée payante : il suffisait d'ajouter "Local=true", et ça fonctionne !!

    merci encore !

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2013] Import .csv dans .xls (1 .csv par feuille)
    Par Antonio 35135 dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 21/04/2015, 14h56
  2. ouverture d'un csv par macro
    Par giom182 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 16/07/2009, 20h26
  3. fichier csv par macro
    Par jnmab dans le forum Requêtes et SQL.
    Réponses: 2
    Dernier message: 03/12/2007, 23h31
  4. [Macro] ouverture d'un fichier csv par macro différent du double-clic
    Par Caro-Line dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 19/04/2007, 16h36
  5. [VBA-E] Problème pour enregistrer en csv (; et non ,) par macro
    Par bounette dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 23/12/2005, 09h34

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