a oui désolé...
Range("F3").Select
Range("F3").Value = "02"
ActiveWorkbook.RefreshAll
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"W:\............................................................\DEPT 02.pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Range("F3").Select
Range("F3").Value = "59"
ActiveWorkbook.RefreshAll
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"W:\..................................................\DEPT 59.pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
End Sub
La macro me met bien les numéros de départements mais du coup ne prends pas les numéros du menu déroulant d'une liste de validation de données et ma matrice ne se met donc pas à jour en fonction des TCD