SUMIF avec cellule visible uniquement
OlivGFT
Messages postés
24
Statut
Membre
-
OlivGFT Messages postés 24 Statut Membre -
OlivGFT Messages postés 24 Statut Membre -
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.
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:
- SUMIF avec cellule visible uniquement
- Clé usb non visible - Guide
- Proteger cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Excel ligne toujours visible - Guide
- Aller à la ligne dans une cellule excel - Guide