Solution copier formule

Bonjour à tous,

J'ai trouvé un module VBA pour une Recherchev comportant plusieurs résultats à partir d'un seul élément.

Feuille 1 : Tableau avec les infos à récupérer

Feuille 2 :
Colonne A : ID
Colonne de B à L : les infos à récupérer en Feuille 1 sur base de l'ID, 10 résultats s'affichent sous forme de ligne (de la ligne 3 à la ligne 12 dans mon cas).
A l'heure actuelle, je n'ai trouvé le moyen que de fusionner la colonne A ligne 3 à 12.

Extrait module :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

Function VLookUpListSplitPerCells(ValeurRecherchee As Range, TableDeRecherche As Range, NumColonne As Integer, Optional Separator As String) As Variant   Dim NbLignes As Integer NbLignes = TableDeRecherche.Rows.Count   Dim CompteurValeursTrouvees As Integer CompteurValeursTrouvees = 0   If Separator = "" Then Separator = ";"   Dim ChaineValeursTrouvees As String   For i = 1 To NbLignes If TableDeRecherche(i, 1).Value = ValeurRecherchee.Value Then CompteurValeursTrouvees = CompteurValeursTrouvees + 1 If CompteurValeursTrouvees > 1 Then ChaineValeursTrouvees = ChaineValeursTrouvees & Separator & TableDeRecherche(i, NumColonne).Value Else ChaineValeursTrouvees = TableDeRecherche(i, NumColonne).Value End If End If Next i   VLookUpListSplitPerCells = Application.WorksheetFunction.Transpose(Split(ChaineValeursTrouvees, Separator))   End Function

---

Formule colonne B (matrice ligne 3 à 12) {=vlookUpListsplitPercells($A3;COMPTA!$D$18:$O$20000;2;"/")
Formule colonne C (matrice ligne 3 à 12) {=vlookUpListsplitPercells($A3;COMPTA!$D$18:$O$20000;3;"/")
Et ainsi de suite jusqu'à la colonne L

Comment puis-je copier/coller les formules sans crainte d'erreur et de manière automatique ?

En effet mon tableau en feuille 1 avec les infos à récupérer fait 20.000 lignes :-/ X 10 résultats... Je vous laisse faire le calcul 8O.

Merci beaucoup de votre précieuse aide.

bonsoir kateline

Citation:

---

J'ai réalisé un module VBA pour une Recherchev comportant plusieurs

---

il est utile est d'un grand apport d'afficher ton bout de code entre balises et d'indiquer ou ça beugue

Bonjour,

Voilà j'ai ajouté le code formule dans mon message initial.

Merci.

Bonjour,

pour les formules commencer déjà à regarder ce lien : https://www.developpez.net/forums/bl...procedure-vba/
PS : il y a une 2ème partie en bas de la page du lien ci-dessus

sinon pour la balise code un exemple est donné => voir ma signature