Bonjour le forum,
Voici une macro qui est utilisée dans l'un de mes fichiers et je cherche à la modifier :
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim deb As Date, fin As Date, t1, t2, tablo, I&, n&, Ws As Worksheet
With Sh
If .Name Like "Taxe*" Then 'critère...