Perso quand j'ai ce genre de chose à traiter je ne renomme pas tout les corps, uniquement ceux qui m'intéressent, et je mets les autres dans des dossiers...
Je sais que tu veux un truc standard pour les renommer en masse mais si cela t'interresse j'ai la macro suivante en stock, elle permet de renommer en masse tous les corps d'une pièce en un même nom suivi de l'incrément d'un compteur, à toi de remplacer le nom de base dans la ligne NewName = "pièce".