Lister les cellules d'une colonne sur une ligne

Bonjour,

Mon sujet n'est pas clair sans exemple et celui-ci est difficile à résumer en 3 mots, je vais donc la clarifier avec un exemple

deux tableaux

Feuille 1

nom client / nom de contact

A / aaa

A / bbb

B / ccc

C / ddd

C / eee

C / fff

Feuille 2

Nom client / n° fact

A / 1

B / 2

B / 3

B / 4

C / 5

C / 6

J'ai besoin d'avoir un tableau qui compile les n° de factures par contact

comme ça:

nom client / nom de contact / n° de facture n° de facture / n° facture /n° facture

A / aaa / 1 1 / /

A / bbb / 1 1 / /

B / ccc / 2 ; 3 ; 4 ou 2 / 3 / 4

C / ddd / 5 ; 6 5 / 6

C / eee / 5 ; 6 5 / 6

C / fff / 5 ; 6 5 / 6

Quelqu'un sait-il comment je peux faire ?

Merci

Sybille

bonsoir,

voici une macro qui se base sur des données présentes en colonnes A et B (plutot que séparées par un /) sur feuil1 et feuil2 et qui met le résultat en feuil1

Sub vasykiki()
Set ws1 = Worksheets("Feuil1")
Set ws2 = Worksheets("Feuil2")
i = 1
While ws1.Cells(i, 1) <> ""
 j = 1
 k = 2
 While ws2.Cells(j, 1) <> ""
  If ws2.Cells(j, 1) = ws1.Cells(i, 1) Then
   k = k + 1
   ws1.Cells(i, k) = ws2.Cells(j, 2)
  End If
 j = j + 1
 Wend
 i = i + 1
Wend