Discussion :

[mlar82]

Bonjour à tous,
Je suis loin de maitriser le langage VB, et, je suis incapable d'arriver à résoudre mon problème.
Dans un fichier Excel 2007 enregistré en «xlsm», j’ai une feuille nommée «A Jour» dans laquelle sont mentionnés par colonne respectivement en A, B, C, D, E, F intitulées dans la ligne 1 : numéro, civilité, nom, prénom, adresse mail, année. Chaque ligne renseignée représente une personne.
Je souhaite copier dans une autre feuille nommée «PourCSV» les lignes non vides. Puis, je voudrais concaténer en colonne G sur chaque ligne le nom, le prénom, suivi de 30 virgules, et l'e-mail.
Pouvez-vous m’aider pour écrire cette commande ?
Merci beaucoup.
Cordialement,
Michel.

[Limace_hurlante]

Bonjour,

A quel endroit est-ce que tu butes dans ta tentative exactement ?

[Raccourcix]

Bonjour

par formule en colonne G

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=C2&D2&REPT(",";30)&E2

REPT pour répéter 30 fois la virgule

une macro me semble utile si vous voulez générer directement le fichier csv avec un code du style

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Open xxx.csv For Output As #1
boucle sur les lignes 
test si ligne non vide
Print #1 , cells(ligne,2)&Cells(ligne,3)&String(30,",")&Cells(ligne,5)
Next ligne
Close #1

Perso , j'ai beaucoup appris à coder en VBA avec https://bidou.developpez.com/article...rmationVBA.pdf
Open/Print c'est en page 69

Stéphane