Salut CedthCed,
For i = Sheets.Count To 2 Step -1
Sheets(i).Delete
Next i
Dans ce code :
--> Sheets.Count compte le nombre de feuilles présentes dans ton classeur
--> le chiffre "2" correspond au numéro de la 1ère feuille qu'il faut commencer à supprimer.
Ainsi si tes 3 premières feuilles sont à conserver, il faut que tu écrives : For i = Sheets.Count To 4 Step -1 --> la suppression va commencer à la 4ème feuille, jusqu'à la dernière
Edit : enfin non en réalité, pour être tout à fait exacte, la suppression va commencer sur la dernière feuille et remonter en supprimant chaque feuille jusqu'à la 4ème feuille incluse.