Concaténer des colonnes

S

STéphane

Guest

• 30 Octobre 2002

• #2

bonjour


For Each cl In Range(Cells(1, ActiveCell.Column), Cells(65536, ActiveCell.Column).End(xlUp))
cl.Offset(, 2).Value = cl.Value & cl.Offset(, 1)
Next cl


bye
STéphane

 

Vote positif 0 Vote négatif

F

Fabrice

Guest

• 31 Octobre 2002

• #3

Merci pour votre réponse, je suis débutant sur VBA excel, je suppose qu'il doit y avoir des paramètres a changer car en applicant votre exemple excel répont : instruction incorrecte a l'interrieur d'ube procédure...

merci@+

 

Vote positif 0 Vote négatif

B

Blandine

Guest

• 31 Octobre 2002

• #4

Voir fichier

 

Pièces jointes

• Concatener.xls

  23 KB · Affichages: 940
• Concatener.xls

  23 KB · Affichages: 967
• Concatener.xls

  23 KB · Affichages: 999

Vote positif 0 Vote négatif

F

Fabrice

Guest

• 31 Octobre 2002

• #5

Impec !!!!

Ca marche super.

J'avais 1500 à 1800 case à me taper !!!

CONCATENER = ECONOMIE DE TEMPS CONSIDERABLE

Merci beauxoup à Blandine

@+

 

Vote positif 0 Vote négatif

L

Luc

Guest

• 11 Décembre 2003

• #6

Bonjour Blandine,

Je n'ai pas eu de formation Excel et j'avais vraiment besoin de fusionner mes 2 colonnes .

Mille merci pour concatener.xls !!!

Luc.

 

Vote positif 0 Vote négatif

L

Luc

Guest

• 11 Décembre 2003

• #7

Bonjour Blandine,

Je n'ai pas eu de formation Excel et j'avais vraiment besoin de fusionner mes 2 colonnes .

Mille merci pour concatener.xls !!!

Luc.

 

Vote positif 0 Vote négatif