Police barre dans commentaire de cellule

[Jeff7087]

Bonjour a tous
Sous Excel 2010, à l'aide de code VBA, je récupère tous les commentaires qu'il peut y avoir dans des cellules. Certains de ces commentaires ont une police barrée, signifiant que l'opération a été annulée. Je cherche un code qui me permette de savoir si cette police est barrée ou non. Si vous avez des idées.
Merci et bonne journée à tous

 

[mromain]

Re : Police barre dans commentaire de cellule

Bonjour Jeff,

Ça ne parait pas évident…
Ci-joint une méthode bancale dans le sens où elle utilise la propriété Shape.Ce lien n'existe plus réservée pour usage interne (d’après l’aide).

Le fichier contient une macro qui teste si le commentaire de la cellule active est :

• partiellement barré ;
• entièrement barré ;
• non barré.

A+

 

[Jeff7087]

Re : Police barre dans commentaire de cellule

Hello mromain
Merci.
C'est déjà un bon début, qui va m'aider au moins à faire une première différenciation.

 

[BOISGONTIER]

Re : Police barre dans commentaire de cellule

Bonjour,

Exemple

Function EstCmtBarré(c)
  Application.Volatile
  If c.Comment Is Nothing Then
     EstCmtBarré = False
  Else
    EstCmtBarré = False
    For i = 1 To Len(c.Comment.Text)
      If c.Comment.Shape.TextFrame.Characters(i, 1).Font.Strikethrough Then EstCmtBarré = True
    Next i
  End If
End Function

JB

 

[Jeff7087]

Re : Police barre dans commentaire de cellule

Merci JB pour cette autre réponse, qui vient en complément de celle de mromain.
Je vais voir comment l'adapter à mon problème, car pour etre complet, je peux avoir des lignes normales et des lignes barrées dans mes commentaires. Maintenant que j'ai une idée plus concrete de la résolution, cela devrait etre plus simple.
Merci à tous les deux.

 

[Jeff7087]

Re : Police barre dans commentaire de cellule

Bonjour
J'ai résolu mon problème, et pour finaliser ce post, pour ceux que cela intéresse, voici un bout de code qui analyse les lignes des commentaires d'une cellule, et qui indique si ces dernières ont une police barrée ou non.

Cdlt