Controle sur USF ne marche pas

[jpmasclet]

Bonjour,

Je me prend la tete depuis quelques heures deja sur un controle de saisie dans un USF et ça ne marche pas.

J'ai créer le code suivant pour un listbox

If frm_gestionnaire.TypePerte.Value = "" Then
        MsgBox "Attention, Vous devez indiquer le type  ! !", vbRetry & vbExclamation, "Message d'erreur"
 Exit Sub
    End If

Mais rien n'y fait cela ne marche pas, ais je fait une boulette ?

 

[PascalXLD]

Re : Controle sur USF ne marche pas

Bonjour

Sans voir ton uf cela va être difficile

une piece jointe nous aiderait

 

[Dull]

Re : Controle sur USF ne marche pas

Salut jpmasclet, Pascal, le Forum

essaye plutôt ça

If frm_gestionnaire.TypePerte.Value = "" Then
MsgBox "Attention, Vous devez indiquer le type  ! !",vbRetryCancel + vbInformation, "Message d'erreur"
End If

Bonne Journée

 

[13GIBE59]

Re : Controle sur USF ne marche pas

Bonjour ,jpmasclet



A priori, il manque au moins les parenthèses à ta msgbox.

A +

Jb

 

[PascalXLD]

Re : Controle sur USF ne marche pas

Bonjour ,jpmasclet



A priori, il manque au moins les parenthèses à ta msgbox.

A +

Jb

Bonjour

Tu peux l'ecrire sans parenthèse cela fonctionne. A mon avis le pbe est ailleurs mais il faudrait voir le fichier

 

[jpmasclet]

Re : Controle sur USF ne marche pas

Merci pour vos réponses mais arghh je ne peux pas envoyer de fichier, mon USF est quasi complet et trop confidientiel et lours pour pouvoir l'envoyer.

Si toutefois ça peux aider mon cas, j'ai ce controle ci qui marche

    If Not IsDate(frm_gestionnaire.TxtboxDate.Value) Then
        MsgBox "Attention, la valeur entrée pour la date n'est pas au bon format ! ! ! Veuillez saisir la date sous la forme jj/mm/aaaa ! ! !", vbRetry & vbExclamation, "Message d'erreur"
        Exit Sub
    End If

 

[PascalXLD]

Re : Controle sur USF ne marche pas

Re

C'est quoi comme controle ton typeperte dans

If frm_gestionnaire.TypePerte.Value = "" Then

???

 

[jpmasclet]

Re : Controle sur USF ne marche pas

Il s'agit de la valeur de ma lisbox, en gros si aucun choix n'est fait je veux que ça lance la msgbox.

Merci pascal

 

[PascalXLD]

Re : Controle sur USF ne marche pas

RE

essaies avec

If frm_gestionnaire.TypePerte.ListIndex= -1 then

 

[Dull]

Re : Controle sur USF ne marche pas

Re le Fil

Apparement vbRetry n'existe pas. Seule vbRetryCancel (valeur 5) existe
Si tu met vbRetry tu aura la valeur 0 soit la même valeur que OkOnly
je te conseil les Fabuleux articles traitant des MsgBox de MyDearfriend! sur son site (quejenecessederecommander)

J'ai tester avec une Combobox et ça fonctionne Bien

Pour une ListBox et comme le dit Pascal un extrait de ton fichier serait le Bienvenu
Bonne Journée

 

[jpmasclet]

Re : Controle sur USF ne marche pas

Trop fort ça marche PASCAL !!!!!!!!! Merci beaucoup ! Trop naze je n'avias pas pensé à ça !!

et merci Dull pour le lien , je vais regarder ça, toujours bon à prendre !!