Bonjour,
j'ai besoin d'ouvrir un fichier .csv :
- le fichier a toujours le même nom
- il se trouve toujours au même endroit
Je dois fermer également ce .csv après traitement.
Savez-vous comment faire ?
Merci l'équipe
Bonjour,
j'ai besoin d'ouvrir un fichier .csv :
- le fichier a toujours le même nom
- il se trouve toujours au même endroit
Je dois fermer également ce .csv après traitement.
Savez-vous comment faire ?
Merci l'équipe
Salut,
Pour ouvrir, puis fermer le csv sans l'enregistrer.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Dim ws As Workbook Set ws = Workbooks.Open("X:\Nouveau document texte.csv") 'Fait ton traitement 'Ferme le fichier sans enregistrer ws.Close False
BlueMonkey,
merci pour votre réponse,
le fichier .csv s'ouvre correctement, il se ferme correctement mais j'ai un autre problème du coup
Quand le csv s'ouvre, j'aimerai qu'il interprète les séparateurs en colonne.
Je veux dire que la il me met tout dans la colonne A. Au lieu de séparer les informations par colonne.
Savez-vous comment lui indiquer ?
Merci
Edit : le séparateur de donnée est ";"
Bonjour,
du coup ce n'est pas un vrai fichier .csv …
Dans ce cas, voir l'aide VBA concernant la méthode OpenText.
_____________________________________________________________________________________
Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion …
Bonsoir,
Une autre façon de faire est de préciser le séparateur de colonne en ajoutant depuis un éditeur de texte (NotePad, Wordpad ...)
la ligne suivante au début du fichier CSV.
Cette ligne ne sera pas visible depuis Excel, mais sert juste à préciser le séparateur utilisé pour le fichier.
Code : Sélectionner tout - Visualiser dans une fenêtre à part sep=;
Autre solution, changer le séparateur de liste dans les paramètres régionaux de ton PC (le mettre à ;)
tu dois pouvoir également utiliser directement Workbooks.Open().
Si tu ne peux modifier ni le(s) CSV, ni les paramètres régionaux, la solution proposée par Marc-L fera le boulot.
Workbooks.OpenText Filename:="nom de fichier", Semicolon:=True.
Bonjour,
Merci pour vos réponses,
je ne peux modifier le csv et les paramètres régionaux..
j'ai donc utilisé cette solution :
Le fichier s'ouvre mais toutes les informations se trouvent dans la colonne A ..
Code : Sélectionner tout - Visualiser dans une fenêtre à part Workbooks.OpenText Filename:="nom de fichier", Semicolon:=True
Je viens de réussir avec ce bout de code :
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Workbooks.OpenText Filename:="fichier.csv", Origin:=xlWindows, _ Local:=True
Merci à toi d'avoir posté la solution que tu as trouvé.
A+
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager