S'IL N'Y A PAS DE RÉPONSE C'EST QU'IL N'Y A PAS DE QUESTION
Avec une petite macro :
Sub supprim_comments()'macro écrite par m@rinaFor Each commentaire In ActiveDocument.Commentscommentaire.DeleteNextEnd Sub