VBA ouverture CSV

Anonyme
2016-05-20T14:29:07+00:00

Bonjour,

Par enregistrement d'une macro

j'ouvre un fichier CSV

Fichier Ouvrir Type de Fichiers 

je choisis mon fichier il s'ouvre tout se décompacte bien en colonnes  selon le ; séparateur.

Par suite j'exécute ma macro

'>

Workbooks.Open Filename:="C:\MonRep\MonFichier.csv"

Le fichier s'ouvre mais reste compacté.

Merci

--

LSteph

Microsoft 365 et Office | Excel | Pour la maison | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires
Réponse acceptée par l’auteur de la question
DanielCo 107.1K Points de réputation
2016-05-20T15:16:23+00:00

Bonjour LSteph

Utilise le paramètre Local:=True de la méthode Workbooks.Open

Cordialement.

Daniel

Cette réponse a-t-elle été utile ?

1 personne a trouvé cette réponse utile.
0 commentaires
Réponse acceptée par l’auteur de la question
Anonyme
2016-05-20T14:59:07+00:00

Bonjour lSteph,

Le fichier s'ouvre mais reste compacté.

J'ai déjà eu ce problème je l'avais résolu avec

'-----------
With Feuil1
.Columns("A:A").TextToColumns Destination:=.Range("A1"), DataType:=xlDelimited, Semicolon:=True
end with
'-----------

--
Salutations
JJ

Cette réponse a-t-elle été utile ?

0 commentaires

29 réponses supplémentaires

Trier par : Le plus utile
Le plus utile Les plus récents Les plus anciens
  1. DanielCo 107.1K Points de réputation
    2016-05-23T08:53:56+00:00

    Bonjour,

    Il n'y a pas de valeur 0 pur CommandType :

    Ca fonctionne très en supprimant la ligne.

    [EDIT] deplus, en regardant dans la fenêtre des variables locales, on voit que "CommandType n'est pas utilisable pour un fichier texte :

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires
  2. Anonyme
    2016-05-23T08:48:39+00:00

    Bonjour,

    Cela n'a pas résolu mes autres difficultés (liées aux fichiers eux mêmes)  mais effectivement

    en ajoutant ce local à opentext cela décompacte.

    M'en souviendrais.

    Merci.

    --

    LSteph

    Cette réponse a-t-elle été utile ?

    0 commentaires
  3. Anonyme
    2016-05-23T08:42:33+00:00

    Bonjour Jacky,

    Ta suggestion me permet de contourner mon problème sur ces fichiers mal fichus

    Nickel j'ai tout résolu :

    Je peux ainsi par VBA

    les ouvrir tels que virer les cadres de transmission sur plusieurs lignes au début du fichier.

    Une fois que le tableau commence bien par la ligne des titres  les décompacter selon ta proposition

    A ce moment je me retrouve néanmoins avec des formats qui ne vont pas à cause de la mauvaise structure d'origine des fichiers qu'on me transmet exemple avec un petit bout

     ;="data";="";="da;ta";="451,32"

    donc j'ai abandonné l'idée de virer préalablement les égal et les guillemets avant décompactage 

    |"data"|      |"da;ta"|"451,32"     |

    pour éviter  que cela devienne 

    |data|      |da     |ta       |       451,32 |         Ce qui provoque un décalage dans certaines colonnes

    C'est donc à ce moment là je dois supprimer les ";" qui sont malencontreusement dans une chaine de caractères

    encadrée de guillemets.

    Seulement en dernier supprimer les guillemets.

    Plus qu'à coller le tout dans le fichier Excel et on boucle sur les suivants.

    Merci

    Et amicales salutations!

    --

    LSteph

    |

    Cette réponse a-t-elle été utile ?

    0 commentaires