OVH Cloud OVH Cloud

Formulaire sur enregistrement non trouvé

13 réponses
Avatar
Drouet Guillaume
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses

10 réponses

1 2
Avatar
Gafish
Bonjour,

Tu peux mettre le code suivant dans l'évenement load de ton formulaire

If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le texte que tu lui auras
mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source, enleve la ligne DOCmd.Close

Arnaud

"Drouet Guillaume" a écrit dans le message de
news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses


Avatar
Sweety
Bonjour
Ca ne marche pas chez moi (rien ne se passe dans tous les cas) avec Access
2000

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

Tu peux mettre le code suivant dans l'évenement load de ton formulaire

If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le texte que tu lui auras
mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source, enleve la ligne
DOCmd.Close


Arnaud

"Drouet Guillaume" a écrit dans le message de
news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses






Avatar
Gafish
J'ai retesté avant de poster sur un 2000 itou et ca passait bien.
Tu as essayé déja de mettre un msgbox dans le if Me.NewRecord voir si tu
passes dans le if ?

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:%
Bonjour
Ca ne marche pas chez moi (rien ne se passe dans tous les cas) avec Access
2000

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

Tu peux mettre le code suivant dans l'évenement load de ton formulaire

If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le texte que tu lui
auras


mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source, enleve la ligne
DOCmd.Close


Arnaud

"Drouet Guillaume" a écrit dans le message de
news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses










Avatar
Sweety
Oui j'ai mis un msgbox au lieu du DoCmd....
(évènement sur chargement)

"Gafish" a écrit dans le message de
news:
J'ai retesté avant de poster sur un 2000 itou et ca passait bien.
Tu as essayé déja de mettre un msgbox dans le if Me.NewRecord voir si tu
passes dans le if ?

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:%
Bonjour
Ca ne marche pas chez moi (rien ne se passe dans tous les cas) avec
Access


2000

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

Tu peux mettre le code suivant dans l'évenement load de ton formulaire

If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le texte que tu lui
auras


mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source, enleve la ligne
DOCmd.Close


Arnaud

"Drouet Guillaume" a écrit dans le message de
news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses














Avatar
Gafish
question bête :) ton form est bien lié à une source de données, par exemple
une table qui ne contient pas de données ?
Si oui, envoie moi ta base (si pas lourde) ou juste le form et sa source de
données par mail que je regarde.

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:
Oui j'ai mis un msgbox au lieu du DoCmd....
(évènement sur chargement)

"Gafish" a écrit dans le message de
news:
J'ai retesté avant de poster sur un 2000 itou et ca passait bien.
Tu as essayé déja de mettre un msgbox dans le if Me.NewRecord voir si tu
passes dans le if ?

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:%
Bonjour
Ca ne marche pas chez moi (rien ne se passe dans tous les cas) avec
Access


2000

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

Tu peux mettre le code suivant dans l'évenement load de ton
formulaire





If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le texte que tu lui
auras


mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source, enleve la ligne
DOCmd.Close


Arnaud

"Drouet Guillaume" a écrit dans le message
de




news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses


















Avatar
Guillaume
sur 2002 cela ne marche pas non plus j'ai un formulaire
vierge, en fait j'ai un formulaire ou j'indique mes
criteres de recherche, et cela me renvoie a un autre
formulaire (qui depand d'une requete) qui m'indique les
enregistrements trouvé
-----Message d'origine-----
J'ai retesté avant de poster sur un 2000 itou et ca
passait bien.

Tu as essayé déja de mettre un msgbox dans le if
Me.NewRecord voir si tu

passes dans le if ?

"Sweety" <*enlevez_ceci* a écrit dans
le message de

news:%
Bonjour
Ca ne marche pas chez moi (rien ne se passe dans tous
les cas) avec Access


2000

"Gafish" a écrit dans le
message de


news:
Bonjour,

Tu peux mettre le code suivant dans l'évenement load
de ton formulaire




If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le
texte que tu lui



auras
mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source,
enleve la ligne



DOCmd.Close

Arnaud

"Drouet Guillaume" a écrit
dans le message de



news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire
lorsque




acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses









.






Avatar
Sweety
La base est malheureusement assez lourde (6 Mo pour la partie applicative et
2.5 Mo pour les tables).
Mon form est lié à une requête sélection (recherche d'articles), donc si
j'ai bien compris, il s'agit d'afficher p.ex.un msgbox au cas ou la requête
ne renvoie rien du tout...


"Gafish" a écrit dans le message de
news:%
question bête :) ton form est bien lié à une source de données, par
exemple

une table qui ne contient pas de données ?
Si oui, envoie moi ta base (si pas lourde) ou juste le form et sa source
de

données par mail que je regarde.

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:
Oui j'ai mis un msgbox au lieu du DoCmd....
(évènement sur chargement)

"Gafish" a écrit dans le message de
news:
J'ai retesté avant de poster sur un 2000 itou et ca passait bien.
Tu as essayé déja de mettre un msgbox dans le if Me.NewRecord voir si
tu



passes dans le if ?

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:%
Bonjour
Ca ne marche pas chez moi (rien ne se passe dans tous les cas) avec
Access


2000

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

Tu peux mettre le code suivant dans l'évenement load de ton
formulaire





If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le texte que tu
lui





auras
mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source, enleve la ligne
DOCmd.Close


Arnaud

"Drouet Guillaume" a écrit dans le message
de




news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses






















Avatar
Gafish
Essaie d'exporter juste ton form et ta requete dans une autre base pour me
l'envoyer.
Car je viens de reessayer avec une requete selection comme toi en source de
mon form ca marche

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:
La base est malheureusement assez lourde (6 Mo pour la partie applicative
et

2.5 Mo pour les tables).
Mon form est lié à une requête sélection (recherche d'articles), donc si
j'ai bien compris, il s'agit d'afficher p.ex.un msgbox au cas ou la
requête

ne renvoie rien du tout...


"Gafish" a écrit dans le message de
news:%
question bête :) ton form est bien lié à une source de données, par
exemple

une table qui ne contient pas de données ?
Si oui, envoie moi ta base (si pas lourde) ou juste le form et sa source
de

données par mail que je regarde.

"Sweety" <*enlevez_ceci* a écrit dans le message de
news:
Oui j'ai mis un msgbox au lieu du DoCmd....
(évènement sur chargement)

"Gafish" a écrit dans le message de
news:
J'ai retesté avant de poster sur un 2000 itou et ca passait bien.
Tu as essayé déja de mettre un msgbox dans le if Me.NewRecord voir
si




tu
passes dans le if ?

"Sweety" <*enlevez_ceci* a écrit dans le message
de




news:%
Bonjour
Ca ne marche pas chez moi (rien ne se passe dans tous les cas)
avec





Access
2000

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

Tu peux mettre le code suivant dans l'évenement load de ton
formulaire





If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le texte que tu
lui





auras
mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source, enleve la ligne
DOCmd.Close


Arnaud

"Drouet Guillaume" a écrit dans le
message






de
news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses


























Avatar
Eric
Bonjour,

Sur ouverture du formulaire appelé, je mettrai:
Private Sub Form_Open(Cancel As Integer)
If Me.RecordsetClone.RecordCount = 0 Then
MsgBox "Nobody", vbInformation
DoCmd.Close acForm, Me.Name
End If
End Sub

A+
Eric

"Sweety" <*enlevez_ceci* écrivait
news::

La base est malheureusement assez lourde (6 Mo pour la partie
applicative et 2.5 Mo pour les tables).
Mon form est lié à une requête sélection (recherche d'articles), donc
si j'ai bien compris, il s'agit d'afficher p.ex.un msgbox au cas ou la
requête ne renvoie rien du tout...


"Gafish" a écrit dans le message de
news:%
question bête :) ton form est bien lié à une source de données, par
exemple

une table qui ne contient pas de données ?
Si oui, envoie moi ta base (si pas lourde) ou juste le form et sa
source
de

données par mail que je regarde.

"Sweety" <*enlevez_ceci* a écrit dans le message
de news:
Oui j'ai mis un msgbox au lieu du DoCmd....
(évènement sur chargement)

"Gafish" a écrit dans le message de
news:
J'ai retesté avant de poster sur un 2000 itou et ca passait bien.
Tu as essayé déja de mettre un msgbox dans le if Me.NewRecord
voir si
tu



passes dans le if ?

"Sweety" <*enlevez_ceci* a écrit dans le
message de news:%
Bonjour
Ca ne marche pas chez moi (rien ne se passe dans tous les cas)
avec
Access


2000

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

Tu peux mettre le code suivant dans l'évenement load de ton
formulaire





If Me.NewRecord Then
DoCmd.Close
DoCmd.OpenForm "TonAutreForm"
End If

ici TonAutreForm est un formulaire qui affichera le texte que
tu
lui





auras
mis, pas exemple "PAs d'enregistrements".
Si tu ne veux pas fermer ton formulaire source, enleve la
ligne
DOCmd.Close


Arnaud

"Drouet Guillaume" a écrit dans le
message
de




news:147b01c4a20b$7d4413d0$
Bonjour comment faire pour renvoyer un formulaire lorsque
acces ne trouve pas d'enregistrement.
Par exemple qu'il affiche un formulaire type "pas
d'enregistrement trouve".
Merci de vos reponses


























Avatar
Eric
Bonjour,

Copie de la réponse donnée à Sweety :

Sur ouverture du formulaire appelé, je mettrai:
Private Sub Form_Open(Cancel As Integer)
If Me.RecordsetClone.RecordCount = 0 Then
MsgBox "Nobody", vbInformation
DoCmd.Close acForm, Me.Name
End If
End Sub

A+
Eric

"Guillaume" écrivait
news:214801c4a217$9c2d79b0$:

sur 2002 cela ne marche pas non plus j'ai un formulaire
vierge, en fait j'ai un formulaire ou j'indique mes
criteres de recherche, et cela me renvoie a un autre
formulaire (qui depand d'une requete) qui m'indique les
enregistrements trouvé
-----Message d'origine-----




1 2