Je dois incorporer plusieurs informations dans une m=EAme cellule
provenant d'une autre liste.
Je ne sais pas comment relier l'information, ma cl=E9 serait le num=E9ro
d'article.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JLuc
*Bonjour *, Si tu passe par vlookup, je suppose que tu va faire ca par macro ? Quand tu recupere la colonne 3 : couleurs = Split(colonne3, ", ")
Tu devrais obtenir un tableau avec autant d'indices que de couleurs présentent
Bonjour,
Je dois incorporer plusieurs informations dans une même cellule provenant d'une autre liste. Je ne sais pas comment relier l'information, ma clé serait le numéro d'article.
*Bonjour barry-auger@sympatico.ca*,
Si tu passe par vlookup, je suppose que tu va faire ca par macro ?
Quand tu recupere la colonne 3 :
couleurs = Split(colonne3, ", ")
Tu devrais obtenir un tableau avec autant d'indices que de couleurs
présentent
Bonjour,
Je dois incorporer plusieurs informations dans une même cellule
provenant d'une autre liste.
Je ne sais pas comment relier l'information, ma clé serait le numéro
d'article.
*Bonjour *, Si tu passe par vlookup, je suppose que tu va faire ca par macro ? Quand tu recupere la colonne 3 : couleurs = Split(colonne3, ", ")
Tu devrais obtenir un tableau avec autant d'indices que de couleurs présentent
Bonjour,
Je dois incorporer plusieurs informations dans une même cellule provenant d'une autre liste. Je ne sais pas comment relier l'information, ma clé serait le numéro d'article.
Merci JLuc Mais ce que je recherche est un peu comme faire un concatenate des noms des couleurs dans une même cellule et par la suite cette infomation sera ajoutée dans une autre liste
Merci JLuc
Mais ce que je recherche est un peu comme faire un concatenate des noms
des couleurs dans une même cellule et par la suite cette infomation
sera ajoutée dans une autre liste
Merci JLuc Mais ce que je recherche est un peu comme faire un concatenate des noms des couleurs dans une même cellule et par la suite cette infomation sera ajoutée dans une autre liste
JLuc
*Bonjour Pacha*, Excuse moi, j'avais pas saisi le probleme. Avec tes donnees triees sur l'article tu peux utiliser ce genre de code :
Sub ConcatenerDonnees() Range("e1:g500").Clear Cells(1, 5) = Range("a2") Cells(1, 6) = Range("b2") Cells(1, 7) = Range("c2") For x = 3 To Range("A65536").End(xlUp).Row ligne = Range("E65536").End(xlUp).Row If Cells(x, 1) = Cells(ligne, 5) Then 'meme reference Cells(ligne, 6) = Cells(ligne, 6) & ", " & Cells(x, 2) Else Cells(ligne + 1, 5) = Cells(x, 1) Cells(ligne + 1, 6) = Cells(x, 2) Cells(ligne + 1, 7) = Cells(x, 3) End If Next End Sub
Adapte selon ton besoin
Merci JLuc Mais ce que je recherche est un peu comme faire un concatenate des noms des couleurs dans une même cellule et par la suite cette infomation sera ajoutée dans une autre liste
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
*Bonjour Pacha*,
Excuse moi, j'avais pas saisi le probleme. Avec tes donnees triees sur
l'article tu peux utiliser ce genre de code :
Sub ConcatenerDonnees()
Range("e1:g500").Clear
Cells(1, 5) = Range("a2")
Cells(1, 6) = Range("b2")
Cells(1, 7) = Range("c2")
For x = 3 To Range("A65536").End(xlUp).Row
ligne = Range("E65536").End(xlUp).Row
If Cells(x, 1) = Cells(ligne, 5) Then 'meme reference
Cells(ligne, 6) = Cells(ligne, 6) & ", " & Cells(x, 2)
Else
Cells(ligne + 1, 5) = Cells(x, 1)
Cells(ligne + 1, 6) = Cells(x, 2)
Cells(ligne + 1, 7) = Cells(x, 3)
End If
Next
End Sub
Adapte selon ton besoin
Merci JLuc
Mais ce que je recherche est un peu comme faire un concatenate des noms
des couleurs dans une même cellule et par la suite cette infomation
sera ajoutée dans une autre liste
*Bonjour Pacha*, Excuse moi, j'avais pas saisi le probleme. Avec tes donnees triees sur l'article tu peux utiliser ce genre de code :
Sub ConcatenerDonnees() Range("e1:g500").Clear Cells(1, 5) = Range("a2") Cells(1, 6) = Range("b2") Cells(1, 7) = Range("c2") For x = 3 To Range("A65536").End(xlUp).Row ligne = Range("E65536").End(xlUp).Row If Cells(x, 1) = Cells(ligne, 5) Then 'meme reference Cells(ligne, 6) = Cells(ligne, 6) & ", " & Cells(x, 2) Else Cells(ligne + 1, 5) = Cells(x, 1) Cells(ligne + 1, 6) = Cells(x, 2) Cells(ligne + 1, 7) = Cells(x, 3) End If Next End Sub
Adapte selon ton besoin
Merci JLuc Mais ce que je recherche est un peu comme faire un concatenate des noms des couleurs dans une même cellule et par la suite cette infomation sera ajoutée dans une autre liste
-- ____ ( O | O ) -- _oooO_ JLuc _Oooo_
O-O
Pacha
JLuc, Je suis très impressionnée, ça fonctionne super bien!
Gros Merci!
Bonne soirée !!
JLuc, Je suis très impressionnée, ça fonctionne super bien!
