Je ne suis pas sûr d'avoir compris ton pb, mais ne suffirait-il pas de faire un SF.locked=true sur l'événement BeforeUpdate() de ton champ ?
SF représente le nom du contrôle contenant ton sous formulaire.
A+
Thocan
Bah... Finalement, j'y arrive pas.
J'ai chopé le N° de l'erreur, mais à quel moment suis-je censé l'intercepter?
Thocan
Ok, merci : je vais essayer ça.
Bloodymary_
oui mais ton code d erreur est toujours le meme dans ce cas particulier
> " j'ai bien un message d'erreur qui s'affiche lors d'une saisie innoportune "
il suffit de l identifier (note juste le numero d erreur) et de le traiter en particulier
on error goto GestionErreur 'Ton code qui peux produire l'erreur
'Sort de la fonction Exit Sub
GestionErreur: Select case Err.Number ' ici tu testes le code d erreur
' ici c est ton cas particulier avec ton numero d erreur
' et tu affiches le msg en consequence
case 120: msgbox ("Erreur champs invalide ..." )
case else : msgbox err.description end case
Et voila le tour est joué
Thocan
Vi, mais ce n'est pas un code en particulier qui génère une erreur : juste une non-saisie de champ obligatoire!
yop
on error goto GestionErreur
'Ton code qui peux produire l'erreur
'Sort de la fonction
Exit Sub
GestionErreur:
Select case Err.Number
case 120: msgbox ("Erreur champs invalide ..." )
case else : msgbox err.description
end case
Et voila le tour est joué
Thocan
Comment ça?
Trappe : kesako?
Bloodymary_
Solution toute simple : trappe l erreur et donne un message explicite a l utilisateur
Thocan
Je sais que vous savez... ;)
Thocan
Salut,
J'ai un sous-formulaire dont je veux interdire l'accès (à savoir insérer des données) tant qu'un des champs de mon formulaire principal n'est pas rempli.
Ayant mis un Null non autorisé, j'ai bien un message d'erreur qui s'affiche lors d'une saisie innoportune, mais celui-ci n'est pas vraiment explicite pour un non initié... ;)
Donc j'aimerai pouvoir faire un test sur ce champ (If IsEmpty(Champ) then...) et changer la propriété "Activate" de mon sous-formulaire de "False" en "True"
Merci
