[RESOLU] MACRO pour concaténer 2 lignes (cellule par cellule) de chaque ligne

ADOL

XLDnaute Nouveau
Bonjour à vous tous.
par le présent message, je sollicite votre aide pour un MACRO qui remplace une longue formule de concaténation de 2 lignes selon la formule suivante.

Exemple:
Ligne 1 de A1 à H1
Ligne 2 de A5 à H5

la formule appliquée est = CONCATENER(A1;A5;B1;B5;C1;C5;D1;D5;E1;E5;F1;F5;G1;G5;H1;H5) :mad:
c-à-d: concaténer une cellule de la ligne 1 suivie d'une cellule de la ligne 2 etc etc.

vu que la formule est très longue surtout quand il s'agit d'une lignes d'une vingtaine de colonnes, je demande votre aide pour un MACRO qui fait la même fonction que la formule ci-haut. :confused:

Juste je dois signaler que le macro doit être paramétrable (si l'on peut dire), c-à-d, il peut être appliqué sur n'importe quell lignes choisies et fonctionne sur tous le classeur et non pas seulement une seule feuille du classeur.

Plus de détail sur le fichier excel ci-joint.

MERCI d'avance à vous.
 

Pièces jointes

  • Exemple.xlsm
    12 KB · Affichages: 33
  • Exemple.xlsm
    12 KB · Affichages: 39
  • Exemple.xlsm
    12 KB · Affichages: 40
Dernière édition:

pierrejean

XLDnaute Barbatruc
Re : aide sur MACRO pour concaténer 2 lignes (cellule par cellule) de chaque ligne

Bonjour Adol

Avec une fonction personnalisée
 

Pièces jointes

  • Exemple (1).xlsm
    17.7 KB · Affichages: 32
  • Exemple (1).xlsm
    17.7 KB · Affichages: 31
  • Exemple (1).xlsm
    17.7 KB · Affichages: 34

Lolote83

XLDnaute Barbatruc
Re : aide sur MACRO pour concaténer 2 lignes (cellule par cellule) de chaque ligne

Salut ADOL,
Peut être avec une fonction personnalisée comme dans le fichier joint.
Tu inscrits une formule = Concaténer2(Plage1,Plage2)

Désolé PierreJean, tu as été plus rapide. Je post quand même.
@+ Lolote83
 

Pièces jointes

  • Copie de ADOL - ConcaténerPlage.xlsm
    18 KB · Affichages: 24

ADOL

XLDnaute Nouveau
Re : aide sur MACRO pour concaténer 2 lignes (cellule par cellule) de chaque ligne

Salut ADOL,
Peut être avec une fonction personnalisée comme dans le fichier joint.
Tu inscrits une formule = Concaténer2(Plage1,Plage2)

Désolé PierreJean, tu as été plus rapide. Je post quand même.
@+ Lolote83

Bonjour Lolote83,
Merci pour vous aussi Lolote83, je suis vraiment impressionné par votre efficacité tous dans ce forum
C'est forum plein de Génie en la matière.
Merci et 1000 merci pour vous et pour Pierre Jean et à tout ce qui passait par mon sujet.
Je vous suis bien reconnaissant
BRAVO et Bonne journée à vous tous.
Amicalement
 

Discussions similaires

Statistiques des forums

Discussions
294 039
Messages
1 935 781
Membres
187 443
dernier inscrit
Sylviestl