Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access ouvrir autre formulaire si conditions

ouvrir autre formulaire si conditions

5 réponses
Avatar
squeepy
Bonjour,

j'ai mis en place dans un formulaire 2 zone de texte
quand je cliq sur valider, si il n'y a rien dans une des 2 zones ou les 2,
il m'affiche un message
Ca c'est bon ca marche
comment faire pour qu'il ouvre un formulaire existant (nom : liste), si il y
a bien quelque chose dans les 2 zones. Si il n'y a rien, il reste sur le
formulaire
--
Merci de votre aide
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Didier Bicking
Complète la propriété "Sur Clic" du bouton Valider :

If Not (Isnull(MaZone1) And Isnull(MaZone2)) Then
DoCmd.OpenForm("MonFormulaire")
End If

--
Bon courage

Didier Bicking

http://perso.wanadoo.fr/dbicking


"squeepy" a écrit dans le message de
news:
Bonjour,

j'ai mis en place dans un formulaire 2 zone de texte
quand je cliq sur valider, si il n'y a rien dans une des 2 zones ou les 2,
il m'affiche un message
Ca c'est bon ca marche
comment faire pour qu'il ouvre un formulaire existant (nom : liste), si il
y
a bien quelque chose dans les 2 zones. Si il n'y a rien, il reste sur le
formulaire
--
Merci de votre aide


Avatar
Eric
Bonjour,
Sur l'évènement click du bouton valider un truc du genre :
If IsNull(texte1) or IsNull(texte2) then
msgbox "au moins un des champs n'est pas renseigné"
Else
DoCmd.Openform "liste" '<-- condition Where à remplir ?
End If


Bonjour,

j'ai mis en place dans un formulaire 2 zone de texte
quand je cliq sur valider, si il n'y a rien dans une des 2 zones ou les 2,
il m'affiche un message
Ca c'est bon ca marche
comment faire pour qu'il ouvre un formulaire existant (nom : liste), si il y
a bien quelque chose dans les 2 zones. Si il n'y a rien, il reste sur le
formulaire


--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
squeepy
Merci mais ça marche a moitié
voici ma formule :
Private Sub Cmd_Valider_Click()
If Not (IsNull(Txt_Date) And IsNull(Txt_Controle)) Then
MsgBox ("Il manque des informations")
DoCmd.OpenForm ("Liste")
End If

Je gére donc un message.
si je mais rien dans aucune des zones, il ouvre rien. Mais si je met qu'un
truc quelque part, il marque qu'il manque des infos, et il m'ouvre quand meme
mon autre formulaire
--
Merci de votre aide



Complète la propriété "Sur Clic" du bouton Valider :

If Not (Isnull(MaZone1) And Isnull(MaZone2)) Then
DoCmd.OpenForm("MonFormulaire")
End If

--
Bon courage

Didier Bicking

http://perso.wanadoo.fr/dbicking


"squeepy" a écrit dans le message de
news:
Bonjour,

j'ai mis en place dans un formulaire 2 zone de texte
quand je cliq sur valider, si il n'y a rien dans une des 2 zones ou les 2,
il m'affiche un message
Ca c'est bon ca marche
comment faire pour qu'il ouvre un formulaire existant (nom : liste), si il
y
a bien quelque chose dans les 2 zones. Si il n'y a rien, il reste sur le
formulaire
--
Merci de votre aide







Avatar
squeepy
impecc
merci Eric
--
Merci de votre aide



Bonjour,
Sur l'évènement click du bouton valider un truc du genre :
If IsNull(texte1) or IsNull(texte2) then
msgbox "au moins un des champs n'est pas renseigné"
Else
DoCmd.Openform "liste" '<-- condition Where à remplir ?
End If


Bonjour,

j'ai mis en place dans un formulaire 2 zone de texte
quand je cliq sur valider, si il n'y a rien dans une des 2 zones ou les 2,
il m'affiche un message
Ca c'est bon ca marche
comment faire pour qu'il ouvre un formulaire existant (nom : liste), si il y
a bien quelque chose dans les 2 zones. Si il n'y a rien, il reste sur le
formulaire


--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr




Avatar
Didier Bicking
If Not (IsNull(Txt_Date) And IsNull(Txt_Controle)) Then
DoCmd.OpenForm ("Liste")
Else
MsgBox ("Il manque des informations")
End If

Le message ne doit apparaître que si la condition après If est fausse, c'est
à dire si un ou les deux contrôles sont vides;
--
Bon courage

Didier Bicking

http://perso.wanadoo.fr/dbicking


"squeepy" a écrit dans le message de
news:
Merci mais ça marche a moitié
voici ma formule :
Private Sub Cmd_Valider_Click()
If Not (IsNull(Txt_Date) And IsNull(Txt_Controle)) Then
MsgBox ("Il manque des informations")
DoCmd.OpenForm ("Liste")
End If

Je gére donc un message.
si je mais rien dans aucune des zones, il ouvre rien. Mais si je met qu'un
truc quelque part, il marque qu'il manque des infos, et il m'ouvre quand
meme
mon autre formulaire
--
Merci de votre aide



Complète la propriété "Sur Clic" du bouton Valider :

If Not (Isnull(MaZone1) And Isnull(MaZone2)) Then
DoCmd.OpenForm("MonFormulaire")
End If

--
Bon courage

Didier Bicking

http://perso.wanadoo.fr/dbicking


"squeepy" a écrit dans le message de
news:
Bonjour,

j'ai mis en place dans un formulaire 2 zone de texte
quand je cliq sur valider, si il n'y a rien dans une des 2 zones ou les
2,
il m'affiche un message
Ca c'est bon ca marche
comment faire pour qu'il ouvre un formulaire existant (nom : liste), si
il
y
a bien quelque chose dans les 2 zones. Si il n'y a rien, il reste sur
le
formulaire
--
Merci de votre aide