Bonsoir RAG02700, le forum,
Merci pour ce code qui fonctionne très bien.
J'ai une question : serait-il possible de remplacer ton code ci-dessous ?
Dim bStatP As Boolean, bStatM As Boolean, bStatG As Boolean
If Sheets("Stats population").Visible = True Then bStatP = True Else Sheets("Stats population").Visible = True
If Sheets("Stats métiers").Visible = True Then bStatM = True Else Sheets("Stats métiers").Visible = True
If Sheets("Stats générales").Visible = True Then bStatG = True Else Sheets("Stats générales").Visible = True
...par un autre argument de type Sheets.activate ou Sheets.Visible = True de façon à ne pas avoir à identifier les feuilles dans les premières lignes de code ?
Si il n'y avait pas d'autres solutions, ce code me conviendra très bien.
Merci encore.
Tchotcho31270