Fonction pour convertir ujn fichier "csv" en "xls"

cs_LibreMax Messages postés 12 Date d'inscription jeudi 3 juin 2004 Statut Membre Dernière intervention 16 août 2005 - 4 août 2004 à 09:22
Totsira Messages postés 4 Date d'inscription mardi 7 janvier 2003 Statut Membre Dernière intervention 26 avril 2011 - 26 avril 2011 à 18:01
Salut,

Quelqu'un connaiterai une fonction pour convertir un fichier ".csv" en ".xls"

Merci

LibreMax

4 réponses

DocteurVB Messages postés 211 Date d'inscription lundi 19 août 2002 Statut Membre Dernière intervention 20 mai 2005
4 août 2004 à 12:53
slt,

moi je ferais comme ça...

ChDir "C:"
Workbooks.Open Filename:="C:\Classeur1.csv"
ActiveWorkbook.SaveAs Filename:="C:\Classeur1.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False

certe il faut être dans excel mais bon ça marche du tonnerre !!!

DocteurVB

****************************************************
N'oublie jamais que même le grand chêne a lui aussi, un jour, été un gland...
****************************************************
0
cs_EXCLUSIF Messages postés 59 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 9 août 2007 1
5 août 2004 à 01:06
remplace tous les ";" par des tabulations (chr(9)) et renommes ton fichier en .xls

eXclusif
0
cs_LibreMax Messages postés 12 Date d'inscription jeudi 3 juin 2004 Statut Membre Dernière intervention 16 août 2005
5 août 2004 à 08:41
Merci

LibreMax
0
Totsira Messages postés 4 Date d'inscription mardi 7 janvier 2003 Statut Membre Dernière intervention 26 avril 2011
26 avril 2011 à 18:01
Merci "exclusif" ... de la simplicité jaillit la lumière.
0
Rejoignez-nous