Bonjour à tous,
Merci pour tous vos posts que j'essaie de consulter le plus souvent possible.
Après plusierus recherches, je n'arrive pas a trouver ce que je veux.
Sur le fichier joint, il y a en haut ce que j'ai et en bas, ce que je veux .
Voici le code que j'ai tapé :
For i = 2 To 11
n = 1
var1 = Cells(i, 1).Value
If var1 <> "" Then
Do While Cells(i + n, 1) = var1
n = n + 1
If Cells(i + 1, 1).Value = var1 Then
var3 = Cells(i, 2).Value & Cells(i + n, 2).Value
n = n + 1
End If
Loop
n = n + 1
Loop Until n = 10
End If
Next i
Vous vous en doutez, ca ne fonctionne pas.
J'ai essayé plusieurs codes, mais je n'arrive pas à utiliser While wend ou do while loop.
Je veux lui dire, dans la colonne A, tant que la ref de la ligne suivante est égale a la ligne actuelle, la variable est = a ce qu'il y a dans la colonne 2 de chaque ligne.
En d'autre termes, je voudrais pour chaque référence, tous les prenoms associé.
Par avance merci
Suerte Croco