Pb avec la fonction subtotal !

cs_beub
Messages postés
20
Date d'inscription
dimanche 19 novembre 2000
Statut
Membre
Dernière intervention
20 février 2006
- 19 juin 2005 à 21:21
cs_beub
Messages postés
20
Date d'inscription
dimanche 19 novembre 2000
Statut
Membre
Dernière intervention
20 février 2006
- 19 juin 2005 à 21:41
Bonjour a tous ( toutes )

voila j ai un petit probleme lorsque je veux faire la somme d une colonne filtrée : tout d abord je recupere le numero de la colonne a filtrer car elle varie dans mon programme , et ensuite je convertit ce numero pour obtenir la lettre de la colonne avant de pouvoir passer la fonction subtotal mais la , a l execution j obtiens une erreur :
voici le code en question :

ranginit = 9
Cells(1, ranginit).Activate
rangee = (Left$(ActiveCell.Address(0, 0), (Cells.Column < 27) + 2))
test2 = Application.Subtotal(2, [rangee:rangee])-1)

Quelqu un a t il une idée ?
Merci d avance !!

1 réponse

cs_beub
Messages postés
20
Date d'inscription
dimanche 19 novembre 2000
Statut
Membre
Dernière intervention
20 février 2006
1
19 juin 2005 à 21:41
oups ca a pas pris en compte les sauts de ligne , je recommence pour le code ! ;)

ranginit = 9
Cells(1, ranginit).Activate
rangee = (Left$(ActiveCell.Address(0, 0), (Cells.Column < 27) + 2))
test2 = Application.Subtotal(2, [rangee:rangee]) - 1


merci !
0