Sub cellulecommentaires() Selection.SpecialCells(xlCellTypeComments).Select Sélection.Style= "Note" End Sub
Pour mettre en surbrillance toutes les cellules avec des commentaires, utilisez cette macro.
Sub cellulecommentaires() Selection.SpecialCells(xlCellTypeComments).Select Sélection.Style= "Note" End Sub
Pour mettre en surbrillance toutes les cellules avec des commentaires, utilisez cette macro.