Faire apparaitre un bouton en fonction d'une formule

Bonjour,

J'ai une macro qui me permet de faire apparaitre un bouton en fonction de s'il y a le mot "Rattrapage" dans ma colonne.

Seulement cette macro fonctionne que si je tape à la main le mot "Rattrapage" et pas si j'utilise une formule pour importer le mot "Rattrapage" de la feuil3.

Quelqu’un peut m’aider ?

Merci.

Bonne journée.

Bonjour,

à tester,

Private Sub Worksheet_Calculate()
If Cells(8, 2) = "Rattrapage" Then
    Me.CommandButton1.Visible = True
Else
    Me.CommandButton1.Visible = False
End If
End Sub

Bonjour,

Tu peux tester la modif suivante :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' permet de verifier si le mot 70S existe dans la plage "B6 à B22"
Dim numéro As String
Dim celluletrouvee As Range
Dim ligne As Integer
Dim col As Integer
Dim rng As Range

Set rng = Range("B6:B22")
If Intersect(Target, rng) Is Nothing Then Exit Sub
'Ecrire le champ recherché
numéro = "Rattrapage"

Set celluletrouvee = rng.Find(numéro, Range("B6"), LookIn:=xlValues, LookAt:=xlWhole)

    If celluletrouvee Is Nothing Then
      CommandButton1.Visible = False
    Else
      ligne = celluletrouvee.Row
      col = celluletrouvee.Column
      CommandButton1.Visible = True
    End If
End Sub

En espèrant que cela t'aide