Désactivation bouton commande si cellule texte

Bonjour,

est ce possible de désactivé le bouton 1 si la cellule b4 contient un texte quelconque avec un msg 'bla bla'

merci par avance

Bonjour,

Ceci:

Private Sub CommandButton5_Click()
    If Range("B4") = "" Then 'si la cellule B4 est vide
        Département.Show
    Else 'sinon, si la cellule B4 n'est pas vide
        MsgBox " Le département est renseigné"
    End If
End Sub

Cdlt

Bonjour Arturo

merci beaucoup