Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Merci pour le classeur et merci à patricktoulon que je salue également.
Je construit mon application lentement, j'ai tout le temps, je suis à la retraite.
Merci beaucoup pour ton aide
Bonjour Eric, bonjour le forum,
Merci pour l'exemple et merci à Dudu2. J'avais ce modèle dont je mettais inspiré, mais c'est ce message délivré à la fermeture qui me gênait un peu car il peut être déroutant pour l'utilisateur. Je cherche un parade à ça et si je la trouve je la partagerais avec...
Désolé mais ça ne fonctionne pas. La croix est bien bloquée. Mais si l'utilisateur veut sortir du formulaire avant même d'avoir saisie du texte dans TxtIntitulé, il ne peut, il est obligé de taper quelque chose s'il veut sortir
Egalement lorsque je clique sur le bouton "Fermer le formulaire", c'est ce que j'ai remarqué chez moi.
Le message s'affiche aussi lorsque je clique sur la croix mais ce problème va être réglé par le fait que je vais rendre cette croix inactive.
Si l'utilisateur veut fermer le formulaire en cours...
Bonne soirée le forum,
Ton code fonctionne à ceci près : Lorsque je clique sur un bouton pour fermer le formulaire, et bien je suis bloqué, le message s'affiche sans cesse.
Cependant, merci de t'être penché sur mon problème
Oui effectivement ça fonctionne. J'avais essayé ton code sur un Uf simple, comme celui tu viens de joindre et ça fonctionnait, mais dans mon application, ça ne fonctionne plus. Est-ce le fait de travailler avec un MultiPage avec des frames, je ne sais pas...
Voici la solution après maints essais. Merci à tous pour votre apport.
Private Sub TxtIntitulé_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
' Touche Tab ?
If KeyCode = vbKeyTab Then
If Trim(Me.TxtIntitulé.Text) = "" Then
MsgBox "Veuillez...
Bonjour Eric C,
Merci pour ton code. Ce qui est bizarre, c'est que le message apparaît à la fermeture de l'Uf pas quand je veux changer de contrôle avec Tab du clavier.
Bonjour Danreb,
Oui j'ai remarqué ça. J'ai abandonné conservé le KeyDown mais je suis toujours à la recherche d'une solution pour bloquer la saisie tant que la TextBox est vide. J'ai également essayé avec BeforeUpdate, mais sans succès.
Bonjour à tous,
Désolé d'avoir tardé à vous répondre. J'ai essayé vos proposition mais ça ne fonctionne pas. Alors j'ai tenté cette approche qui fonctionne mais pas tout à fait. J'ai bien le message qui s'affiche, mais je peux passer au contrôle suivant.
Private Sub TxtIntitulé_KeyDown(ByVal...
Bonjour à toutes et à tous,
Voici mon problème : Dans un formulaire Vba, j'ai une TextBox qui a le focus à l'activation. Je souhaiterais savoir comment faire pour empêcher de quitter le focus tant que la TextBox est vide ? L'utilisateur ne peut rien rien tant que rien n'est saisie.
Merci par...