Filtrer cellules avec un commentaire inséré

Re : Filtrer cellules avec un commentaire inséré

Bonsoir,

Peut etre : F5 / "Cellules" / "Commentaires" / OK

Re : Filtrer cellules avec un commentaire inséré

Bonjour Gareth,
C'est une solution pour les mettre en surbrillance.
Y a t'il une solution pour les mettre d'une autre couleur (cela permettra des les filtrer)
Merci de votre aide
DST

Re : Filtrer cellules avec un commentaire inséré

Bonjour,

Voir PJ


JB

Re : Filtrer cellules avec un commentaire inséré

Bonjour à tous,

Ci-joint des solutions dérivées de ma premiere proposition

Re : Filtrer cellules avec un commentaire inséré

DST,

Si tu as Excel 2010, la première solution de Gareth est complétable ainsi et ne nécessite pas de macro.
1°) Filtrer le tableau
2°) Utiliser la jumelle pour ne chercher que les commentaires ou utiliser la touche de raccourci "F5" (puis "Cellules" / "Commentaires")
3°) Utiliser la fonction de tri par couleur du filtre.


Gareth, je fais dériver le premier bloc de ta procédure de tri pour pouvoir l'utiliser sur une tableau plus grand.

sub CommentsSort
Dim x, lEndColumn
If ActiveSheet.Type <> xlWorksheet Then Exit Sub
ActiveSheet.UsedRange 'réinitialisation de la plage utilisée
lEndColumn = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Column + 1
For Each x In Cells.SpecialCells(xlCellTypeComments)
x.EntireRow.Cells(1, lEndColumn).Value = 1
' x.offset(0, 1) = 1
Next
end sub