Syntaxe pour SumIfs

Bonjour à tous,

J'essaie de trouver la bonne syntaxe pour la fonction SumIfs.

J'ai simplifié le code au maximum, pourtant VBA bloque, Objet requis, erreur 424.

En plage 3 se trouvent les valeurs à additionner et en plages 1 et 2 lse trouvent 2 critères à respecter ("a" et "oui")

Quelqu'un pourrait-il m'aider à trouver la bonne syntaxe pour cette fonction ?

Merci beaucoup.

Fabert

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub test() plage1 = Range("B3:B9") plage2 = Range("C3:C9") plage3 = Range("D3:D9")   a = WorksheetFunction.SumIfs(plage3, plage1, "a", plage2, "oui")   End Sub

---

Bonjour,

il faut instancier les plages au moyen de l'instruction Set

Code:

---

1 2 3

Set plage1 = Range("B3:B9") Set plage2 = Range("C3:C9") Set plage3 = Range("D3:D9")

---

il est également conseillé de libérer la mémoire en fin de procédure, en déchargeant les variables

Code:

---

1 2 3

Set plage1 = Nothing Set plage2 = Nothing Set plage3 = Nothing

---

et également conseillé de déclarer ses variables

Code:

---

1 2 3 4

Dim a As Long Dim Plage1 As Range Dim Plage2 As Range Dim Plage3 As Range

---

Merci,

La déclaration des variables n'est pas mon fort. Il y a certainement un intérêt bien sûr, mais je ne l'ai pas encore intégré.

Peux-tu me dire en quelques mots à partir de quand c'est vraiment utile?


Merci encore.

Bonjour,

c'est toujours utile surtout pour les débutants ...

de plus tu devrais rajoute en haut de toutes tes pages de code la ligne :

Code:

---

Option Explicit

---

ok merci.

Cependant, dans ma plage 1, ce sont des dates qui y figurent. Est-il possible d'affecter à plage1 le mois de la date au lieu de la date elle-même ?

Merci.