Bonjour,
J'utilise actuellement cette petite fonctions VBA qui me permet de faire une sorte de rechercheV qui me renvoie plusieurs résultats si il y en a plusieurs:
Function rmult(valcherch As Variant, x As Range, colonne As Long) As Variant
Dim u As Variant
Dim nb As Long
Dim boucle As Long
For boucle = 1 To x.Rows.Count
If x(boucle, 1) = valcherch Then
u = u & ";" & x(boucle, colonne)
nb = nb + 1
End If
Next boucle
rmult = u
End Function
C'est une fonction relativement "connue" sur les différents forum VBA.
Mon PB: je souhaiterai que chaque résultat apparaisse dans une cellule particulière plutôt que d'avoir une cellule avec tous les résultats séparés par des ";".
Je recherche la solution depuis un moment déjà, j'essaye actuellement de faire une nouvelle fonction qui utiliserai cette fonction mais sans résultat pour le moment..
Toute aide serait donc bienvenue
Merci d'avance!
J'utilise actuellement cette petite fonctions VBA qui me permet de faire une sorte de rechercheV qui me renvoie plusieurs résultats si il y en a plusieurs:
Function rmult(valcherch As Variant, x As Range, colonne As Long) As Variant
Dim u As Variant
Dim nb As Long
Dim boucle As Long
For boucle = 1 To x.Rows.Count
If x(boucle, 1) = valcherch Then
u = u & ";" & x(boucle, colonne)
nb = nb + 1
End If
Next boucle
rmult = u
End Function
C'est une fonction relativement "connue" sur les différents forum VBA.
Mon PB: je souhaiterai que chaque résultat apparaisse dans une cellule particulière plutôt que d'avoir une cellule avec tous les résultats séparés par des ";".
Je recherche la solution depuis un moment déjà, j'essaye actuellement de faire une nouvelle fonction qui utiliserai cette fonction mais sans résultat pour le moment..
Toute aide serait donc bienvenue
Merci d'avance!