Concatener 2 colonne en les croisant

[souketou]

bonjour,

l'intitulé est un peu tordu je l'avoue. Je joint un petit fichier qui résume très bien ce que je cherche à faire.

J'ai des reference produit des code couleur et je veux obtenir pour chaque reference produit la concaténation de cette ref et du code de chaque couleur.

Merci d'avance.

 

[phlaurent55]

Re : Concatener 2 colonne en les croisant

Bonjour souketou

=A2&" "&B2
à mettre en d2

et recopier la formule vers le bas

Edit: tu peux aussi mettre un point entre les guillemets

 

[souketou]

Re : Concatener 2 colonne en les croisant

Merci pour votre réactivité mais cette formule fait une concaténation ligne par ligne et ne croise donc pas les données.

Merci d'avance pour tout éclaircissement je ne peu plus avancé sans cela.

 

[phlaurent55]

Re : Concatener 2 colonne en les croisant

Re,

voici le code à mettre dans un module

Sub Macro1()
Dim i
Dim j
Dim derligneA
Dim derligneB
Dim pos
pos = 2

derligneA = Range("A65535").End(xlUp).Row
derligneB = Range("B65535").End(xlUp).Row
For i = 2 To derligneA
    For j = 2 To derligneB
    Range("E" & pos).Value = Range("a" & i).Value & "." & Range("b" & j).Value
    pos = pos + 1
    Next j
Next i


End Sub

 

[souketou]

Re : Concatener 2 colonne en les croisant

Merci 1000 fois le code est super et sachant que cela correspond a plus de 700 ref et 50 couleurs....

Merci encore bonne continuation.

 

[phlaurent55]

Re : Concatener 2 colonne en les croisant

Re,

sachant que cela correspond a plus de 700 ref et 50 couleurs....

ce qui te feras 35000 lignes.....................
ne perds pas de vue que si tu en a plus, Excel2003 n'acceptera pas plus de 65536 lignes

à toi d'être attentif au dépassement de capacité

bonne fin de journée

 

[Monique]

Re : Concatener 2 colonne en les croisant

Bonjour,

Par formule