Fonction SI texte est barré

Bonjour à tous,

Je cherche une fonction excel me permettant de détecter si mon texte est barré ou pas.

Exemple: Si ma cellule [A1] contient du texte barré, alors [A2] = 1

Il y a surement plusieurs solutions, mais je ne m'en sors pas et je ne trouve pas de vraie solutions quand je parcours les différents forums...

Cordialement,

Corsaire.

Bonjour,

Pourquoi ne pas utiliser une UDF ...

Function Barré(Cell As Range)
  With Cell.Characters(Len(Cell), 1)
     If .Font.Strikethrough = True Then
        Barré = True
     Else
       Barré = False
     End If
  End With
End Function

Bonjour corsaiire, James007,

Tu peux essayer ce code dans une macro (De la première ligne à la dernière ligne "non vide" de la colonne A, si la cellule est barrée, on met "barrée" dans la colonne B, tu peux facilement remplacé dans le code par ce que tu veux pour le contenu de B)

Sub Macro1()
Dim LastRow As Long

LastRow = Cells(Rows.Count, 1).End(xlUp).Row

For i = 1 To LastRow
    If Cells(i, 1).Font.Strikethrough = True Then
        Cells(i, 2) = "Barrée"
    End If
Next i
End Sub

Bonsoir à vous deux,

Super merci pour vos réponses j'ai réussi à m'en sortir avec votre aide !

Bonne soirée à vous.

Cordialement,

Corsaire.

Bonjour,

Merci pour tes remerciements ...