SUMIF avec cellule visible uniquement

Fermé
OlivGFT Messages postés 22 Date d'inscription jeudi 24 octobre 2013 Statut Membre Dernière intervention 28 février 2014 - Modifié par OlivGFT le 8/02/2014 à 13:32
OlivGFT Messages postés 22 Date d'inscription jeudi 24 octobre 2013 Statut Membre Dernière intervention 28 février 2014 - 10 févr. 2014 à 20:35
Bonjour je suis débutant VBA et je souhaite faire un sumif sur des cellules visible uniquement:

Voici mes codes et aucun ne marche...
Quelqu'un pourrai t'il m'expliquer pourquoi ?
Je souhaite additionner dans la feuille "tableau" l'ensemble des valeurs qui sont supérieur à 27.
Ensuite cette valeur ce place dans la feuille "donnée"
les plages recherchés et les valeurs addtionner se trouve au même endroit.
J'ai fait des filtres et caché des lignes via vba préalablement.



Code 1 :
Worksheets("Donnée").Cells(x, y).Value = _
WorksheetFunction.SumIf(Range("'Tableau'!T2:T").SpecialCells(xlCellTypeVisible), _
">27", Range("'Tableau'!T2:T").SpecialCells(xlCellTypeVisible))

Code 2 :

Set plage3 = Sheets("Tableau").Range("T2:T100000").SpecialCells(xlCellTypeVisible)
azer= Application.SumIf(Range(plage3), ">27", Range(plage3))
Worksheets("Donnée").Cells(x, y).Value = azer

Code 3:
Worksheets("Donnée").Select
Set azer = Cells(x, y)

Worksheets("Tableau").Select
azer = Application.SumIf(Range("T2:T" & Range("T100000").End(xlUp).Row).SpecialCells(xlVisible) _
, ">27", Range("T2:T" & Range("T100000").End(xlUp).Row).SpecialCells(xlVisible))

Le code 3 fonctionne mais me renvoit la valeur #VALUE! au lieu de la somme...

Pouvez vous m'indiquer mes erreurs ? je pige pas...

Merci d'avance.
A voir également:

1 réponse

OlivGFT Messages postés 22 Date d'inscription jeudi 24 octobre 2013 Statut Membre Dernière intervention 28 février 2014
10 févr. 2014 à 20:35
Quelqu'un a t'il une idée ?...
0