XL 2016 Convertion d'un export en csv

[yblotiere]

Bonjour
ci joint un fichier avec 2 onglet un export d'une liste que j'obtient à partir d'une appli
j'ai créer une macro qui transforme cette export avec les colonne que je souhaite et dans l'ordre que je souhaite
il faut qu'une que cela est fait il faut enregistrer le resultat du second onglet en fichier .csv avec separateur ;
Je vous joind le fichier réaliser et si quelqu'un veut bien se pencher sur l'optim de la macro
Merci d'avance
yannick

 

[Jacky67]

il faut enregistrer le resultat du second onglet en fichier .csv avec separateur ;
yannick

Bonjour,
Essaye comme ceci

Sub Convert()
Dim Chemin As String, Nom As String
Chemin = "F:\"  'à adapter
Nom = "Tournée du " & Format(Date, "DDMMYY")
Feuil2.Cells.Clear: Feuil2.Name = Nom
With Feuil1
  .Columns("h:h").Copy Feuil2.[a1]
  .Columns("E:E").Copy Feuil2.[b1]
  .Columns("i:i").Copy Feuil2.[c1]
  .Columns("K:K").Copy Feuil2.[g1]
  .Columns("J:J").Copy Feuil2.[h1]
  Application.CutCopyMode = False
End With
Feuil2.Copy
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=Chemin & Nom, FileFormat:=xlCSV, Local:=True
ActiveWorkbook.Close
End Sub

 

[yblotiere]

Merci pour ton travail
si je souhaite qu'au moment de l'enregistrement il me demande sous quel nom je souhaite enregister
Cordialement
Yannick

 

[Jacky67]

Merci pour ton travail
si je souhaite qu'au moment de l'enregistrement il me demande sous quel nom je souhaite enregister
Cordialement
Yannick

Re...
Essaye cette version.

 

[yblotiere]

Merci jacky67
j'ai un petit souci se fichier Csv je doit l'importer dans une autre appli
hors je me retrouve avec des lignes vides
par contre lorsque je ouvre le fichier Csv sur excel et que je refait fichier enregistrer
je ne rerouve plus le probleme lors de l'importation dans l'appli
aurais tu une idées sur ce qui provoque le problème
Cordialement
Yannick

 

[Jacky67]

aurais tu une idées sur ce qui provoque le problème

RE...
Non, aucune idée...
Essaye de renseigner les cellules H45 et H48 de la feuille "Origine" et tester

 

[yblotiere]

Bonjour Jacky
je crois avoir trouver en fait le fichier générer en csv contient systématiquement
48 lignes mais je ne vois pas pourquoi.

Cordialement
yannick