Re : Besoin aide VBA
Probablement. Il ne faudrait alors surtout pas virer l'installation des formules de totaux. Vous voyez bien comment ça marche tout ça. Dans le tableau destiné au vidage rapide on met dans les lignes de rubriques (LDébTotQuelqueChose) la valeur "=" & Lr comme valeur dans la 1ère colonne de totaux (CrDébTot), Lr étant la ligne où on en est arrivé à ce moment là du remplissage. Comme il commence par "=", ce signal est transformée en une formule simple donnant seulement la ligne de fin pour ce début de rubrique, ce qui permet ensuite, après vidage du tableau, de les balayer simplement en ne prenant que les Me.Columns(CrDébTot).SpecialCells(xlCellTypeFormulas, 1) pour y mettre les formules "=SUBTOTAL(9, etc.. Rien n'empêcherait de faire un peu la même chose, mais d'abord, pour d'autres formules, cette fois dans les ligne de la rubrique CCoût seulement. Mettre le signal en CrDébTot + 1 par exemple.
Ou alors, si ça peut marcher, mettre ces FormulaR1C1 sur toutes les lignes des colonnes concernées, avant de les écraser, dans les lignes où elles n'ont pas lieu d'être, par les formules SOUS.TOTAL…