[AC-2002] Forumulaire en mode tableau

[Nitsuja]

Bonjour tout le monde :-)

J'ai fait une application Access qui permet de gérer des données via des menus en boite de dialogue.
J'ai donc du mettre en place tout un tas de formulaire pour répondre au besoin de mon client afin de pouvoir gérer les événements voulu. (Exemple : si je passe un champ à 0 alors cela va ouvrir un msgbox pour demander qqch à l'utilisateur).

Tout marche niquel cependant il n'y a pas de Trigger sur Access je doit obligatoirement passer par des formulaires. Et mon client vient de me signaler qu'il veut des tableaux !

Voila donc mes questions :
Est-il possible de gérer des événements quand le formulaire est en mode "datasheet" ?
Est-il possible de conserver mes boutons du mode formulaire pur ?

En espérant avoir été assez clair

Merci d'avance pour votre aide !

[Nitsuja]

Petite précison :

Au début j'avais pensé à montrer le formulaire en Read Only et si l'utilisateur voulait modifier quelque chose alors il selectionnait l'enregistrement qu'il souhaitait modifier et cliquait sur un "bouton" qui passe le formulaire en mode normal.
Mais sans événement dans le "mode tableau" impossible de faire ça !

[Nitsuja]

Personne peut m'aider ?

Bon j'ai trouvé une idée qui pourrait être ma solution :
Associé mon formulaire avec un sous formulaire qui lui serait en mode tableau (en Read Only). Voir pièce jointe parce que je sens que j'explique mal :p
Cependant j'ai encore un pb
J'aimerais que mon forumulaire père corresponde à l'enregistrement sélectionné dans le formulaire fils.

Ai-je un moyen d'arriver à mes fins ?

[Nitsuja]

Re-Bonjour

Je me sens un peu tout seul ici
J'ai établit un code vba qui est censé faire ce que je veux.
Cependant je n'arrive pas à parcourir les pages d'un formulaire.. Il semble que la méthode GoToPage ne marche aussi bien que je le voudrais.

Comment faire, en vba, pour parcourir les pages d'un formulaire ?
Il y aurait-il une méthode comme FindFirst des recordset mais pour les formulaires ?

En bonus le code qui ne marche pas à cause de GotoPage :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Private Sub Form_Click()
  Dim fTabPerm, fPerm As Form
  Dim rs As Recordset
 
   Set fPerm = Forms![F_CurrentPermanents]
   Set fTabPerm = fPerm![SF_CurrentPermanents]
 
   Set rs = CurrentDb.OpenRecordset("Q_CurrentPermanents", dbOpenSnapshot)
 
   rs.FindFirst "ID_STAFF = " & fTabPerm![ID_STAFF]
 
   Debug.Print rs.AbsolutePosition
 
   fPerm.GoToPage rs.AbsolutePosition + 1
 
End Sub

Edit : ca doit être possible car access intégre déjà une recherche qui parcoure les pages d'un formulaire !