Discussion :

[GIPPE]

Bonjour à toutes et à tous,

A partir d'un formulaire qui possède un sous formulaire,j'ouvre un 2e Formulaire.
Jusque là,tout va bien.
Le problème:
Après la fermeture du 2e Formulaire j'opère un requery sur mon 1er formulaire

Code :

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

Forms![Formulaire1]![Sous-Formulaire].Requery

et il s'avère que je retourne sur le 1er enregistrement de mon sous form.
Ce qui ne m'arrange pas puisque j'ai une centaine d'enregistrements et la scrollBar c'est pas top!!!

J'ai bien essayé la méthode

Code :

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

DoCmd.GoToRecord acDataForm, "Forms![Formulaire1]![Sous-Formulaire]", acGoTo, MaVariable

Mais cela ne fonctionne pas ,errreur.

Auriez vous des idées à me proposer.Je suis certain que l'un ou l'une d'entre vous a été confronté à ce problème.

Merci

[LedZeppII]

Bonsoir,

DoCmd.GoToRecord acDataForm fonctionne avec un formulaire ouvert dans une fenêtre.
Le sous-formulaire est vu comme un contrôle.
Il ne reste comme possibilité que DoCmd.GoToRecord acActiveDataObject

Code vb :

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

1
2
3
4
5
6
7
' S'assurer que le formulaire a le focus
Forms!Formulaire1.SetFocus
' Donner le focus au contôle sous-formulaire
' pour qu'il devienne acActiveDataObject
Forms!Formulaire1![Sous-Formulaire].SetFocus
 
DoCmd.GoToRecord acActiveDataObject, , acGoTo, MaVariable

Il y a aussi une méthode plus directe avec la propriété SelTop

Code vb :

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

Forms!Formulaire1![Sous-Formulaire].Form.SelTop = MaVariable

Bon courage.

[keita]

bonjour
Essaie comme ça pour voir:
1/dans le code du bouton qui ouvre le 2è form

Code :

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

1
2
 
mavariable=Me!MonSousForm.Form.CurrentRecord

2/A la fermeture du 2è form et apres le "requery"

Code :

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

1
2
3
 
Forms![Formulaire1]![Sous-Formulaire].SetFocus 
DoCmd.GoToRecord acDataForm, , acGoTo MaVariable

@+

[GIPPE]

C'est génial ça fonctionne
Merci à vous deux LedZeppII et Keita

[profane]

Bonjour,
j ai le meme soucis mais je n'utilise pas de bouton
apres le requery je me retrouve sur le 1er enregistrement de mon sous formulaire, et je prefererais rester au meme endroit du sous formulaire
ou dois je declarer Mavariable pour adapter ?