Excel 1ère ligne vide en dessous d'un tableau
resolutionexcel
Messages postés
5
Statut
Membre
-
Gord21 Messages postés 928 Statut Membre -
Gord21 Messages postés 928 Statut Membre -
Bonjour,
J'ai crée une macro qui fait les sous-totaux des listes déroulantes que je sélectionne. Néanmoins, pour faire ces sous totaux, je dois à chaque utilisation de ma macro entrer le numéro de la première ligne vide en dessous de mon tableau pour figer la cellule sur laquelle je veux que mon sous-total apparaisse. Je souhaiterais donc intégrer une formule qui détecterait automatiquement le numéro de cette première ligne vide pour ne pas rentrer dans le code à chaque fois ... mais je ne sais pas comment faire.
Ci dessous, pour plus de clareté, voici le code VBA:
Range("AG1").Select
Cells(Rows.Count, ActiveCell.Column).End(xlUp).Select
ActiveCell.Offset(2, 0).Select
Selection.AutoFilter Field:=5, Criteria1:="X"
Selection.AutoFilter Field:=6, Criteria1:="Y"
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[-165]C:R[-1]C)"
J'espere que vous pourrez m'aider,
Merci d'avance!
J'ai crée une macro qui fait les sous-totaux des listes déroulantes que je sélectionne. Néanmoins, pour faire ces sous totaux, je dois à chaque utilisation de ma macro entrer le numéro de la première ligne vide en dessous de mon tableau pour figer la cellule sur laquelle je veux que mon sous-total apparaisse. Je souhaiterais donc intégrer une formule qui détecterait automatiquement le numéro de cette première ligne vide pour ne pas rentrer dans le code à chaque fois ... mais je ne sais pas comment faire.
Ci dessous, pour plus de clareté, voici le code VBA:
Range("AG1").Select
Cells(Rows.Count, ActiveCell.Column).End(xlUp).Select
ActiveCell.Offset(2, 0).Select
Selection.AutoFilter Field:=5, Criteria1:="X"
Selection.AutoFilter Field:=6, Criteria1:="Y"
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[-165]C:R[-1]C)"
J'espere que vous pourrez m'aider,
Merci d'avance!
A voir également:
- Excel 1ère ligne vide en dessous d'un tableau
- Trier un tableau excel - Guide
- Tableau word - Guide
- Imprimer un tableau excel - Guide
- Partager photos en ligne - Guide
- Liste déroulante excel - Guide