XL 2013 recherche multicritère dans un tableau avec des données d'un form

kangourou01

XLDnaute Nouveau
Bonjour à tous
Je pense que mon problème est simple mais comme je débute en VBA j'ai encore quelque soucis.
Apres avoir parcouru le site j'ai pas trouvé mon bonheur dommage.
j'ai un document avec 2 sheets le premier me sert a enregistrer des information en provenance d'un form
le second sheet me sert de Data base
mon soucis est que je n'arrive pas a aller chercher une donnée dans ma DB avec 2 information saisie dans le formulaire
j'ai essayer d'utiliser la formule
Sheets("tracking").Range("K" & L).Formula = "=SUMPRODUCT((DB!$F$2:$F$25=ComboBox2.value)*(DB!$G$2:$G$25=ComboBox1.value)*(DB!$H$2:$H$25))"
mais j'ai un superbe #name
une aide serait la bien venue car je pense mon problème est l'utilisation de donnée en provenance du form
par avance merci
 

Pièces jointes

  • apiform.xlsm
    21.3 KB · Affichages: 31

vgendron

XLDnaute Barbatruc
Hello
la syntaxe pour écrire ta formule n'est pas bonne
Perso. je passe toujours par une variable "Formule" pour voir ce que j'écris

VB:
Private Sub CommandButton1_Click()
Dim L, NUM, LL As Integer
If MsgBox("Confirmez vous ajout Pots?", vbYesNo, "Demande de confirmation") = vbYes Then
    L = Sheets("tracking").Range("b65536").End(xlUp).Row + 1
    LL = Sheets("tracking").Range("A65536").End(xlUp).Row + 1
    NUM = 1
    For I = 1 To TextBox1.Value
        Range("B" & L).Value = ComboBox2
        Range("C" & L).Value = NUM
        Range("D" & L).Value = ComboBox1
        Range("E" & L).Value = ListBox1.Value
        Range("F" & L).Value = TextBox2
        formule = "=SUMPRODUCT((DB!$F$2:$F$25=""" & ComboBox2.Value & """)*(DB!$G$2:$G$25=""" & ComboBox1.Value & """)*(DB!$H$2:$H$25))"
        Sheets("tracking").Range("K" & L).Formula = formule
       
        L = L + 1
        NUM = NUM + 1
    Next
End If
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 198
Messages
2 086 149
Membres
103 133
dernier inscrit
mtq