copier x cellules dans une seule

Salut lematou,

Par exemple, en A1 :
¤ & " " & b4 & " " & c4

Mais pas très pratique. Une tite macro, peut-être :
Sélectionne ls cellules que tu veux assembler, par
exemple, en a1, et appelle cette macro :

Sub Assemble()
For Each cellule In Selection
If Not IsEmpty(cellule) Then copie = copie & " " & cellule
Next cellule
[a1] = copie
End Sub

Serge


"lematou" <lematou@discussions.microsoft.com> a écrit dans le message de
news: 11B7990F-730D-4A2A-8EA8-CAC82C92B347@microsoft.com...

Bonjour,
avez vous une solution pour copier x cellules du style
aze
ert
tyu

le nombre est variable

dans une seule cellule du style : aze ert tyu
merci
jacks

Utilises la fonction "concatener".

Si A1 =a, A2=b, A3=c
En cellule B1=concatener(A1;A2;A3), B1 te donnera abc


Si A1 =a, A2=b, A3=c
En cellule B1=concatener(A1;" ";A2;" ";A3), B1 te donnera a b c

JP

"lematou" <lematou@discussions.microsoft.com> a écrit dans le message de
news: 11B7990F-730D-4A2A-8EA8-CAC82C92B347@microsoft.com...

Bonjour,
avez vous une solution pour copier x cellules du style
aze
ert
tyu

le nombre est variable

dans une seule cellule du style : aze ert tyu
merci
jacks

L'assistant fonction est trés facile pour cette fonction
"lematou" <lematou@discussions.microsoft.com> a écrit dans le message de
news: 11B7990F-730D-4A2A-8EA8-CAC82C92B347@microsoft.com...

Bonjour,
avez vous une solution pour copier x cellules du style
aze
ert
tyu

le nombre est variable

dans une seule cellule du style : aze ert tyu
merci
jacks

| L'assistant fonction est trés facile pour cette fonction

Un véritable couteau suisse !
;-)

AV