Discussion :

[Marcopololo]

Bonjour,

J'ai un formulaire de modification avec 3 onglets.

Tout fonctionne bien en général mais j'ai des cas particuliers qui me font planter la base et fermer access.
En remontant en arrière, j'ai réussi à cerner à peu près le problème, mais je n'arrive pas à trouver la logique. Y en a t-il une ?

Le code qui me fait planter ma base est celui qui recherche les données pour les afficher dans le même temps dans le sous formulaire et le formulaire :
Si je le désactive je peux ouvrir le formulaire en modification sans problème.


Ce code se trouve dans le sous formulaire Requête Modif Clients sous-formulaire

Code :

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

1
2
3
4
5
6
7
8
Private Sub Form_Current()  'Permet aux champs extincteurs du formulaire Modif Client de se positionner
                            ' sur le même enregistrement que le sous formulaire
    Dim Rs As Object
 
        Set Rs = Forms![Modif Clients].Recordset.Clone
        Rs.FindFirst "[Liste extincteurs]![N°] = " & Str(Nz(Me![N°], 0))
        If Not Rs.EOF Then Forms![Modif Clients].Bookmark = Rs.Bookmark
End Sub

Je met la base réduite, si cela peut aider (formulaire à lancer : Recherche de client). Sans cela va être dur..
Par exemple, le code 4170 plante. C'est le champ palier 4ème étage qui créé le bug.
Si je le supprime, tout est OK, si je le créé à nouveau cela plante.

Merci de votre aide

MArcopololo

PS Le problème semble bien se situer dans le formulaire Modif client et le sous formulaire B]Requête Modif Clients sous-formulaire[/B], car l'ensemble des requêtes sont bien créé et correctement lors de la sélection du code.

[Marcopololo]

Bon,

J'avance à petits pas,

C'est la dernière ligne du code qui me fait le bug :

Code :

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

If Not Rs.EOF Then Forms![Modif Clients].Bookmark = Rs.Bookmark

Marcopololo


Rectification : Même si en enlevant ce bout de code je règle mon problème. Si je supprime le 3ème onglet, le formulaire fonctionne parfaitement, comme avant et avec le code ci dessus.
Donc j'en déduit que le problème vient de cet onglet ??

[Marcopololo]

Bonjour,

Tout d'abord merci à Renardo qui m'a apporté une solution en mettant le code de recherche des enregistrements sur le fonction click au lieu de current.
Cela fonctionne à priori.

En creusant plus le problème survient à partir du moment ou je créé un sous formulaire dans le 3ème onglet.
Si je le supprime, tout fonctionne, si j'en créé un, même s'il fait appel à une requête totalement indépendante.
Il y a bug ???

Marcopololo

[Renardo]

salut
j'ai fait au plus simple hier soir mais peut etre y a t'il une autre solution je regarderais tout a l'heure