OVH Cloud OVH Cloud

Mise a jour de boite de recherche

3 réponses
Avatar
sem1
Bonjour a tous

Je seche sur un petit pb, et la consultation de Google Groups ne me
renseigne pas car trop aride (je suis debutant)

J ai un formulaire qui comporte une boite de recherche : je ne comprend pas
tout mais cela marche! (Exemple trouvé sur le site de Raymond)
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[RefProc] = " & Str(Me![SearchBox])
Me.Bookmark = rs.Bookmark

Avec cette boite je me positionne sur un enregistrement que je peux modifier
par un sous formulaire (appele par bouton de commande)
Je peux meme supprimer le dit enregistrement par le sous formulaire, et dans
ce cas au retour bien sur je plante.
La boite affiche #name et j ai un MsgBox d erreur. J ai constate qu il
suffit de fermer puis rouvrir le formulaire appelant pour remettre la boite
en bon etat, ce qui parait logique.

Dans mon code attache au bouton, je sais fermer au retour du sous formulaire
par DoCmd.Close acForm, Me.name
Mais comment faire pour reouvrir?

Y a t il une solution plus elegante ou plus efficace?

Merci d'avance de vos lumieres

--
SEM1
Pour me répondre directement, enlever [PAS DE SPAM] de l'adresse et
remplacer FAI par wanadoo

3 réponses

Avatar
3stone
Salut,

On ne ferme pas pour ré-ouvri...

Fait plutôt un Me.Requery


--
A+
Pierre (3stone) Access MVP
~~~~~~~~~~~~~~~~~~~~~~~
http://users.skynet.be/mpfa
http://users.skynet.be/accesshome




"sem1" <cimeo[PAS DE SPAM]@FAI.fr> a écrit dans le message news:
418160b5$0$3620$
Bonjour a tous

Je seche sur un petit pb, et la consultation de Google Groups ne me
renseigne pas car trop aride (je suis debutant)

J ai un formulaire qui comporte une boite de recherche : je ne comprend pas
tout mais cela marche! (Exemple trouvé sur le site de Raymond)
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[RefProc] = " & Str(Me![SearchBox])
Me.Bookmark = rs.Bookmark

Avec cette boite je me positionne sur un enregistrement que je peux modifier
par un sous formulaire (appele par bouton de commande)
Je peux meme supprimer le dit enregistrement par le sous formulaire, et dans
ce cas au retour bien sur je plante.
La boite affiche #name et j ai un MsgBox d erreur. J ai constate qu il
suffit de fermer puis rouvrir le formulaire appelant pour remettre la boite
en bon etat, ce qui parait logique.

Dans mon code attache au bouton, je sais fermer au retour du sous formulaire
par DoCmd.Close acForm, Me.name
Mais comment faire pour reouvrir?

Y a t il une solution plus elegante ou plus efficace?

Merci d'avance de vos lumieres

--
SEM1
Pour me répondre directement, enlever [PAS DE SPAM] de l'adresse et
remplacer FAI par wanadoo



Avatar
sem1
Merci de ta réponse
Je vais essayer, mais mardi parce que maintenant le rideau est tombe...
Bon week end

3stone wrote:
Salut,

On ne ferme pas pour ré-ouvri...

Fait plutôt un Me.Requery



"sem1" <cimeo[PAS DE SPAM]@FAI.fr> a écrit dans le message news:
418160b5$0$3620$
Bonjour a tous

Je seche sur un petit pb, et la consultation de Google Groups ne me
renseigne pas car trop aride (je suis debutant)

J ai un formulaire qui comporte une boite de recherche : je ne
comprend pas tout mais cela marche! (Exemple trouvé sur le site de
Raymond) Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[RefProc] = " & Str(Me![SearchBox])
Me.Bookmark = rs.Bookmark

Avec cette boite je me positionne sur un enregistrement que je peux
modifier par un sous formulaire (appele par bouton de commande)
Je peux meme supprimer le dit enregistrement par le sous formulaire,
et dans ce cas au retour bien sur je plante.
La boite affiche #name et j ai un MsgBox d erreur. J ai constate qu
il suffit de fermer puis rouvrir le formulaire appelant pour
remettre la boite en bon etat, ce qui parait logique.

Dans mon code attache au bouton, je sais fermer au retour du sous
formulaire par DoCmd.Close acForm, Me.name
Mais comment faire pour reouvrir?

Y a t il une solution plus elegante ou plus efficace?

Merci d'avance de vos lumieres

--
SEM1
Pour me répondre directement, enlever [PAS DE SPAM] de l'adresse et
remplacer FAI par wanadoo




Avatar
sem1
Merci, ça marche maintenant!

3stone wrote:
Salut,

On ne ferme pas pour ré-ouvri...

Fait plutôt un Me.Requery



"sem1" <cimeo[PAS DE SPAM]@FAI.fr> a écrit dans le message news:
418160b5$0$3620$
Bonjour a tous

Je seche sur un petit pb, et la consultation de Google Groups ne me
renseigne pas car trop aride (je suis debutant)

J ai un formulaire qui comporte une boite de recherche : je ne
comprend pas tout mais cela marche! (Exemple trouvé sur le site de
Raymond) Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[RefProc] = " & Str(Me![SearchBox])
Me.Bookmark = rs.Bookmark

Avec cette boite je me positionne sur un enregistrement que je peux
modifier par un sous formulaire (appele par bouton de commande)
Je peux meme supprimer le dit enregistrement par le sous formulaire,
et dans ce cas au retour bien sur je plante.
La boite affiche #name et j ai un MsgBox d erreur. J ai constate qu
il suffit de fermer puis rouvrir le formulaire appelant pour
remettre la boite en bon etat, ce qui parait logique.

Dans mon code attache au bouton, je sais fermer au retour du sous
formulaire par DoCmd.Close acForm, Me.name
Mais comment faire pour reouvrir?

Y a t il une solution plus elegante ou plus efficace?

Merci d'avance de vos lumieres

--
SEM1
Pour me répondre directement, enlever [PAS DE SPAM] de l'adresse et
remplacer FAI par wanadoo