Bonjour, apres avoir suivis vos conseils, j'ai donc renommé une feuille du fichier "Global" et ensuite inséré une forme dans laquelle j'affecte une maccro en tapant le code suivant :
Sub Rectangle1_Cliquer()
Dim o As Worksheet
Sheets("Global").Cells.Clear
For Each o In Worksheets
If o.Name <>...