Sommeprod

Bonjour Phil,

Pour que ta formule fonctionne, tu dois tenir compte en outre :

A ) Les plages nommées doivent être de même dimension (même nombre de lignes)

B ) Attention, Un combobox ne peut retourner qu'une valeur "TEXTE", si dans ta plage de cellule, tu as des valeurs
numériques, cela ne va pas fonctionner. Il va falloir que tu utilises une fonction de conversion comme cdbl()

Exemple :

Label28 = (([fichier_type] = Cdbl(ComboBox4.Value))* ([fichier_genre] = cdbl(ComboBox1.Value)))

Il y a peut être d'autre chose, difficile sans savoir sans voir !!!


Salutations!



"Phil" <phil@defer.fr> a écrit dans le message de news:28d301c49b16$fea4b750$a501280a@phx.gbl...
Bonjour
j'essaie de mettre au point cette macro, mais cela ne
fonctionne pas, elle plante ;-(
Sait-on pourquoi ?
Merci pour votre aide

Private Sub CommandButton3_Click()
Label28 = Application.WorksheetFunction.SumProduct
(([fichier_type] = ComboBox4.Value) * ([fichier_genre] ComboBox1.Value))

End Sub

Merci beaucoup, mais cela ne fonctionne pas.
Phil

-----Message d'origine-----
Bonjour Phil,

Pour que ta formule fonctionne, tu dois tenir compte en
outre :

A ) Les plages nommées doivent être de même dimension
(même nombre de lignes)

B ) Attention, Un combobox ne peut retourner qu'une
valeur "TEXTE", si dans ta plage de cellule, tu as des

valeurs

numériques, cela ne va pas fonctionner. Il va falloir que
tu utilises une fonction de conversion comme cdbl()

Exemple :

Label28 = (([fichier_type] = Cdbl(ComboBox4.Value))*
([fichier_genre] = cdbl(ComboBox1.Value)))

Il y a peut être d'autre chose, difficile sans savoir
sans voir !!!

Salutations!



"Phil" <phil@defer.fr> a écrit dans le message de
news:28d301c49b16$fea4b750$a501280a@phx.gbl...

Bonjour
j'essaie de mettre au point cette macro, mais cela ne
fonctionne pas, elle plante ;-(
Sait-on pourquoi ?
Merci pour votre aide

Private Sub CommandButton3_Click()
Label28 = Application.WorksheetFunction.SumProduct
(([fichier_type] = ComboBox4.Value) * ([fichier_genre] =
ComboBox1.Value))

End Sub


.

Bonjour Phil,

Au lieu de te contenter d'un "ça marche pas"

Si tu donnais pour chacun des textbox :

Leur plage de données source, quel type d'informations retrouve -t-on dans ces plages ? du texte, des dates, des valeurs
numériques ?

Est-ce que tu exécutes la procédure lorsqu'un des combobox est vide (non renseigné) ?

Si tu veux solutionner ton problème : à toi de fournir de l'information sur ton application.


Salutations!



"phil" <phil@defer.fr> a écrit dans le message de news:29ac01c49b25$4ed42e00$a501280a@phx.gbl...
Merci beaucoup, mais cela ne fonctionne pas.
Phil

-----Message d'origine-----
Bonjour Phil,

Pour que ta formule fonctionne, tu dois tenir compte en
outre :

A ) Les plages nommées doivent être de même dimension
(même nombre de lignes)

B ) Attention, Un combobox ne peut retourner qu'une
valeur "TEXTE", si dans ta plage de cellule, tu as des

valeurs

numériques, cela ne va pas fonctionner. Il va falloir que
tu utilises une fonction de conversion comme cdbl()

Exemple :

Label28 = (([fichier_type] = Cdbl(ComboBox4.Value))*
([fichier_genre] = cdbl(ComboBox1.Value)))

Il y a peut être d'autre chose, difficile sans savoir
sans voir !!!

Salutations!



"Phil" <phil@defer.fr> a écrit dans le message de
news:28d301c49b16$fea4b750$a501280a@phx.gbl...

Bonjour
j'essaie de mettre au point cette macro, mais cela ne
fonctionne pas, elle plante ;-(
Sait-on pourquoi ?
Merci pour votre aide

Private Sub CommandButton3_Click()
Label28 = Application.WorksheetFunction.SumProduct
(([fichier_type] = ComboBox4.Value) * ([fichier_genre] >ComboBox1.Value))

End Sub


.