Discussion :

[Maribo]

Bonjour,

J'ai besoin d'aide pour résoudre un problème avec la fonction AllowEdit.

J'utilise cette fonction pour restreindre les modifications à un certain groupe d'usagers.

Selon le niveau d'accès attribué à l'usager, je souhaite ouvrir un formulaire (qui comporte un contrôle de navigation dont chaque onglet comporte un sous-formulaire.)

J'utilise ce code pour ouvrir le formulaire à partir de la page d'accueil, où le no_dossier correspond au numéro de dossier à ouvrir dans le formulaire:

Code :

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

DoCmd.OpenForm "F_pt_ID_edit", , , "no_dossier = '" & no_dossier.Value & "'"

Dans le Form_load du formulaire qui s'ouvre j'ai:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Form_Load()
 
    'Transfert du nom d'usager de l'accueil au formulaire  
    Me.txtUser = Forms!F_accueil!txtUser.Value
    'Transfert du niveau d'accès de l'usager au formulaire  
    Me.txtLevel = Forms!F_accueil!txtLevel.Value
 
 
    If Me.txtLevel.Value = 1 Then
        Me.AllowEdits = False
    Else
        Me.AllowEdits = True
    End If
 
    DoCmd.Close acForm, "F_accueil"
 
End Sub

Quand le formulaire s'ouvre, le sous-formulaire qui se trouve dans l'onglet ouvert par défaut va chercher le numéro de dossier du premier rentré dans la table plutôt que d'aller chercher celui qui est demandé.

Quand je clique sur le 2e onglet, c'est le bon numéro de dossier.

Et quand je reviens par la suite sur l'onglet par défaut, c'est le bon numéro de dossier...

Par essais-erreurs, j'ai trouvé que si j'enlève le code ce-haut dans le Form_Load, ça marche.

Comment je pourrais faire pour régler ce problème?
Merci!

[Maribo]

Le problème ne vient pas du tout de la fonction AllowEdit...

Ça vient de l'ordre de chargement et d'exécution des formulaires et de leur codes respectifs.

Le code du sous-formulaire contenu dans l'onglet par défaut du contrôle de navigation se charge avant celui du formulaire qui le contient!!!

Chaque sous-formulaire du contrôle de navigation a son code pour aller chercher le bon numéro de dossier. Et comme le code pour aller chercher le bon numéro de dossier se trouvait dans le Form_Load du sous-formulaire, le chargement du code du formulaire annulait ce code.

J'ai résolu en mettant le code dans le Form_Current() et ça marche.

Possiblement que tout ça est causé par le fait que mon code est loin d'être optimal!