Fusionner les donnes dé 2 cellule

[nadav]

Bonjour,

Je dispose de deux cellules dont j'aimerais regrouper les données en une seule
En l'occurence je voudrais récuperer toutes les donnes du champ VILLE et les mettre à la suite du champ CPVIL sans perdre aucune donnée ce sui se passe quand on fait "Fusionner les celules"

Qq un sera t'il mon sauveur ?

Merci à vous tous

NAdav

 

[brigitte]

Bonjour Nadav, le Forum,

Oui c'est possible grâce à la fonction CONCATENER. Voici ton fichier en retour.

Bon dimanche.




Brigitte

 

[brigitte]

Re,

J'ai voulu faire vite ; bien sûr il faut, tu l'auras compris, recopier vers le bas la formule en E2. Revoici le fichier.

 

[Celeda]

Bonjour,

Salut Nadav, salut Brigitte,

certes par concaténation et

par une macro adaptée à tes besoins (voir module inséré dans VBA en faisant ALT F11) que Zon m'avait faite mais je ne sais pas faire un espace dans la macro entre Ville et CP.

Sub Concatene()
Dim I As Long
Application.ScreenUpdating = False
For I = 1 To [B65536].End(xlUp).Row
Range("E" & I) = Trim(Range("D" & I)) & Trim(Range("C" & I))
Next I
End Sub

Celeda

 

[Pat5]

Bonjour le forum

Voilà Celeda

Sub Concatene()
Dim I As Long
Application.ScreenUpdating = False
For I = 1 To [B65536].End(xlUp).Row
Range("E" & I) = Trim(Range("D" & I)) & " " & Trim(Range("C" & I))
Next I
End Sub

A++

Pat5 ;o)

Bon dimanche

 

[Celeda]

Bonjour,

Je viens de m'apercevoir d'une petite coquille, dans
For I = 1 To [B65536].End(xlUp).Row

remplace par D65536 mais ca marche quand même, lol!!!

Celeda

 

[Celeda]

Bonjour,

Arf!!Pat5, toi aussi je te marche sur la patte, décidemment,

Merci pour l'espace....c'était quand même simple c'est comme les formules !!

Celeda

 

[nadav]

Superbe,
C impeccable, je vois que les puits de sciences sont en ébulition.
Merci à tous.
;-) à Celada