Bloquer bouton VBA avec 2 conditions

Hi

J'aimerais bloquer le bouton Ajouter avec une seconde condition

c'est a dire ajouter :

if CboSer <>""

Mais je ne vois pas où le mettre pour que ça fonctionne....

Merci et have nice day

[code]

'Bloquage bouton AJOUTER

Private Sub TxtPrenom_Change()

If TxtPRENOM <> "" Then

BtnAJOUTER.Enabled = True

Else

BtnAJOUTER.Enabled = False

End If/code]

Bonjour

Essaie comme ça :

If TxtPRENOM <> "" Or CboSer <> "" Then
    BtnAJOUTER.Enabled = True
Else
    BtnAJOUTER.Enabled = False
End If
Bye !

Bonjour

Merci pour la réponse, j'ai essayé mais ça ne fonctionne pas.

Si je rempli la Txtprenom et pas la CboSer cela débloque la touche ajouté

Si je rempli la CboSer et pas la TxtPrenom, la touche ajouté est toujours bloqué.

En fait , je souhaite que les deux cases ( Txt Prénom et Cbo Ser ) soient rempli pour activer le bouton ajouter

Bonjour Marius07, gmb,

Essaie de remplacer Or par And

If TxtPRENOM <> "" And CboSer <> "" Then

Cordialement,

Bonjour

une nouvelle fois merci pour l'aide.

J'ai bien remplacé le or par and mais à présent le bouton ajouter est toujours bloqué.

Et j'avoue que je ne vois pas pourquoi ??

Alors, joins ton fichier, anonymisé au besoin et on regardera ça de plus près.

Bye !

Bonsoir

Les deux codes fonctionnent correctement séparément

Private Sub TxtPrenom_Change()

If Txt Prénom<>"" Then

ou

Private SubCbo Service_Change()

If CboSer<>"" then

Que dois je mettre en début de code pour remplacer (Private Sur TxtPrenom_change() ou Private subCboSer_Change(), pour que les deux fonctionnent avec " and ":

J'ai mis

Private Sub TxtPrenom_Change()

If Txt Prénom<>"" and CboSer<>"" then

et je pense que mon erreur vient de la

Merci

Ma