Bonjour,

J'aimerai savoir s'il est possible de simplifier ce code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Cells(1, 2).Value = Cells(1, 1).Value & Chr(10) & Cells(2, 1).Value & Cells(3, 1).Value & Chr(10) & Cells(4, 1).Value
Mon problème est que l'ensemble des informations vont de la ligne 1 à 13200 dans la colonne A
cela représente les nom, prénom adresse, code postal et ville de 3000 personnes
et j'aimerai leur envoyer un courrier postal et donc faire un tableau de 3 colonnes sur 1000 lignes (que j'imprimerai sur des étiquettes autocollante...)
le problème vient du fait qu'il n'y a pas le même nombre de ligne pour chaque personne.
Dans la colonne B j'ai écrit une formule de condition que si la cellule de gauche commence par "M. " ou "MME" alors "x"
Cela me donne le début et la fin des cellules que je dois prendre en compte pour fusionner leurs contenu dans mon tableau de 3 sur 1000.

Je sais faire des boucles For Next mais du coup je dois mettre des IF selon le nombre de ligne par personne.

Merci pour votre aide