supprimer une ligne d'un fichier csvRésolu

Question

Bonjour,

J'ai un fichier csv et je cherche en VBScript a supprimer la première ligne...

quelqu'un peut il m'aider ? Merci

cs_Sbt · Answer

Bonjour,

Voici un bout de code rapide.
Il lit le fichier csv en entree et ecrit un fichier en sortie sans la première ligne.


Dim objFileSystem
Dim objFichierSortie
Dim objFichierEntree

Set objFileSystem = WScript.CreateObject("Scripting.FileSystemObject")
Set objFichierSortie = objFileSystem.CreateTextFile("c:\Temp\Temp.txt")
Set objFichierEntree = objFileSystem.OpenTextFile("c:\Temp\TestCSV.csv")

' Lecture de la première ligne d'entete.
Ligne = objFichierEntree.ReadLine
Do While Not objFichierEntree.AtEndOfStream
Ligne = objFichierEntree.ReadLine
objFichierSortie.WriteLine(Ligne)
Loop
objFichierSortie.Close
objFichierEntree.close
objFileSystem.DeleteFile "c:\Temp\TestCSV.csv"
objFileSystem.CopyFile "c:\Temp\Temp.txt", "c:\Temp\TestCSV.csv"
objFileSystem.DeleteFile "c:\Temp\Temp.txt"


En espérant que ca réponde à ton besoin.
A+
Sbt

Benjyii · Answer

Merci ça marche :)

Supprimer une ligne d'un fichier csv

2 réponses

Votre réponse

Discussions similaires