Remplacer IsEmpty

Bonjour, je n'arrive vraiment pas a comprendre la language VBA alors je revient vers vous.

Je voudrais remplacer dans cette formule Is Empty par une valeur par exemple x

Private Sub Worksheet_Change(ByVal Target As Range)

Me.CommandButton4.Visible = Not IsEmpty(Me.Range("AE1").Value)

End Sub

Merci de votre aide

Bonsoir

Si j'ai compris

Private Sub Worksheet_Change(ByVal Target As Range)
'Me.CommandButton4.Visible = Not IsEmpty(Me.Range("AE1").Value)
Me.CommandButton4.Visible = IIf(UCase(Range("AE1")) = "X", True, False)
End Sub

exactement merci beaucoup