Re : TCD - parametrage automatique
Chris, merci pour ces explications. Merci egalement Kiki 29 pour la precision sur la protection des macros.
J'ai pu editer le code et l'etudier.
J'ai voulu faire une modification dans la macro pour afficher non pas la periode "MM a MM+12" mais la periode "MM-12 a MM" dans le tableau dynamique. Il n'y pas pas de pb au debuggage mais la periode affichee reste fixee a Jan~Dec quelque que soit le mois MM. Quelqu'un voit-il d'ou vient l'erreur?
Ci-dessous le code et un extrait du fichier reel.
Private Sub Worksheet_Calculate()
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
Dim x, y As Long
If Target.Address = "$B$1" Then
x = Range("'" & ActiveWorkbook.Name & "'!" & "MM").Value
y = DateSerial(Year(x), Month(x), 1)
x = DateSerial(Year(x), Month(x) - 12, 1)
Range("B6").Select
Selection.Group Start:=x, End:=y, Periods:=Array(False, False, _
False, False, True, False, False)
End If
End Sub