Discussion :

[ensascience]

Bonjour les Furomistes!

dans un formulaire avec un tabcontrol
j'ai un bouton qui permet de fermer le formulaire principale et d ouvrir le formulaire du menu
et un onglet qui contiens un sous formulaire dans lequel j 'ai mis un code pour declancher un msg lorsqu'un champs obligatoire manque

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[OppNumber] = 0) Then
Cancel = True
MsgBox "Please complete all Required fields :the opportunity number is required."
Else
Confirmation
End If
End Sub

on faisant le test suivant :
laisser le champ obligatoire vide et essayant de quitter directement le formulaire avec le boutton
j'ai eu l"error 2169 que j'ai pu eviter avec ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub Form_Error(DataErr As Integer, Response As Integer)
 If DataErr = 2169 Then
    Response = acDataErrContinue
    Cancel = True
 End If
End Sub

le formulaire se ferme et le menu principal s'ouvre mais l enregistremnt des données dans le sous formulaire est annulé ...

ce que je veux c est d annuler l'action du bouton (fermeture du formulaire ) si l'erreur 2169 se produit et que le msg se declanche et apres mettre le focus sur le champs manquant "OppNumber"pour que l'utilisateur puisse le remplir

est ce possible et comment ?

Merci

[curt]

Bonsoir,

il suffit de mettre le bouton sur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

enabled=false

sur la levée de l'erreur

Curt

[ensascience]

Bonjour Curt,

le bouton est sous forme d'une image sur la quelle j 'ai mis 2 actions: Closewindow et OpenForm
alors sa marche pas par Enabled

A+

[curt]

Bonjour Ensascience,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

visible=false

fonctionnera
Tu peux mettre une autre image en arrière plan "pour meubler" ou un texte "Fermeture annulée"

Mais tu aurais aussi pu insérer un bouton dans ton formulaire et y coller une image... pour le coup, enabled=false fonctionnait !!

Curt

[ensascience]

Salut Curt,

Mais l'erreur se produit lorsque j appuie sur le bouton et pas avant

A+

[curt]

Et bien, tu n'as qu'à mettre la gestion d'erreur sur le bouton...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

On error goto Erreur

en tête de module et la gestion d'erreur sous l'étiquette

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Erreur:

comme tu l'as déjà réalisé...

Curt