séparateur point virgule sur un CSV

[loic38]

bonjour à la communauté
voilà mon pb
j'ai créé une macro qui enregistre sous un format CSV la feuille en cours :
mais au lieu d'obtenir des ; en séparateur j'obtiens des Virgules

j'ai vérifié les paramètres régionaux de XP et le séparateur de champ est bien le ;

Dim chemin As Variant
'matricule = InputBox('Svp saisir le N° de matricule', 'NUMERO')


Columns('A').Select
Selection.Copy
Workbooks.Add
ActiveSheet.Paste
Application.CutCopyMode = False
Application.Goto Reference:='R1C1'
Rows('1:1').Select
Selection.Delete Shift:=xlUp
Application.Goto Reference:='R1C1'
ChDir 'I:\\EXCEL\\REC\\Import_Pointage_Clip'
chemin = 'I:\\EXCEL\\REC\\Import_Pointage_Clip\\classeur' & matricule & '.csv'


ActiveWorkbook.SaveAs Filename:=chemin, FileFormat:=xlCSV, CreateBackup:=False
ActiveWorkbook.Close


quelqu'un a t'il déjà rencontré le pb ?
merci

 

[Brigitte]

Hello Loïc,

As-tu utilisé la recherche tout en haut, tu tapes CSV et tu valides..

J'ai notamment trouvé ceci :

Lien supprimé

Ca semble être le contraire, alors peut être... et il semble y avoir plein de posts sur le sujet, peut être y trouveras tu ton bonheur.

Bon courage.. et bisous

 

[loic38]

bonjour brigitte
ravi de voir que mes post sont lus
oui j'ai fait cette recherche mais j'ai l'impression que la réponse ne correspond pas tout à fait à mon pb

par contre à propos de recherche, je trouve que les critères de recherche sont pauvres sur XLD
il manque de rechercher par date
si je recherche aussi par nom, notamment sur moi même (et oui charité bien ordonnée ,etc....) je trouve pas le 1/4 de ma prose

nostalgie : je trouvais l'ancienne méthode de recherche plus pratique et plus fiable

a +

 

[loic38]

bonjour José
merci de me dépanner
je suis sur une version 2000
et je n'ai pas la possibilité de saisir Local:=True
il provoque une erreur

j'ai bien essayé le USF de Tyhierry
il marche parfaitement bien
de là à pouvoir l'adapter à ma macro !!