Navigations par vba

Bonjour,

J'ai un formulaire de navigation avec 5 volets. Je veux, en double cliquand sur un item d'un "listebox", changé de volet et faire apparaitre l'information du client (populer les menus, champs textes...). Mon problème est que je n'arrive pas à me positioner sur le formulaire...

ceci fonctionne... l'onglet change...

Code:

---

1 2	Forms!programe.ContrôleNavigation0.Tabs(1).SetFocus SendKeys "{Enter}"

---

Mais ceci ne fonctionne pas... je n'ai pas accès aux contrôles du volet. Le prog dit qu'il ne trouve pas le champs "ctltab1"...

Code:

---

1 2	Forms!programe.Form!SousForm!CtlTab1.Modifiable77 = Noclient

---

Merci pour vos idées.
Gorj

Essaye cela :

Code:

---

Forms!programe!SousForm.Form!Modifiable77 = Noclient

---

Les contrôles des onglets sont visibles au niveau du formulaire.

Je te conseille aussi de donner un nom significatif à tes objets. Modifiable77 ne dit pas grand chose, quelque chose comme ChoixClient=NoClient est plus compréhensible.

A+

Merci pour ton retour.

En fait, j'ai un formulaire de navigations avec des onglets, et dans l'onglet Client, j'ai un formulaire "client" qui contient lui aussi des onglets. Par contre le "Modifiable77" n'est pas dans un onglet du formulaire client (il est situé dans le haut du panneau)... Or, à la sélection d'un client dans Modifiable77, je met à jour les contrôles de plusieurs onglets à l'intérieure du formulaire client.

J'ai essayé ton code, et maintenant Access ne trouve pas le champs Modifiable77 auquel il fait référence...

Logiquement le code devrait être...

Code:

---

Forms!programe!SousForm.Form!client.Modifiable77 = Noclient

---

Mais ceci me donne "qu'Access ne trouve pas le champs client...

A+

Ok voici la syntaxe standard pour accéder :

• à un contrôle dans un formulaire principal : [Forms]![NomTonFormulaire]![NomTonControle]
• à un contrôle dans un sous-formulaire : [Forms]![NomTonFormulaire]![NomTonControleSousFormulaire].Form![NomTonControle]

Tu noteras que c'est bien [NomTonControleSousFormulaire] c'est à dire le nom du contrôle qui contient le sous formulaire et pas [NomTonFormulaireUtiliseCommeSousFormulaire].


Attention aussi même si un contrôle est dans un onglet il est visible au niveau du formulaire pas comme élément de l'onglet.

A+

Voici les résultats que j'obtiens...

Code:

---

Forms!programe!SousForm.Form!Modifiable77 = Noclient

---

erreure: Trouve pas le champ Modifiable77

Code:

---

Forms!SousForm!Modifiable77 = Noclient

---

erreure: Trouve pas le formulaire SousForm

Code:

---

Forms!programe!Modifiable77 = Noclient

---

erreure: Trouve pas le champ Modifiable77

Code:

---

Modifiable77 = Noclient

---

erreure: Aucun message d'erreure, mais le menu déroulant n'obtient pas le id du client

Code:

---

Modifiable77.value = Noclient

---

erreure: Erreure 424, Objet requis

C'est d'autant plus embêtant, car je ne peux pas travailler avec des modules.

Merci

Comment s'appelle le formulaire principal ? Est-ce "Programe" ?

Comment s'appelle le contrôle qui contient le sous-formulaire dans le formulaire principal ? Est-ce "SousForm" ?

Modifiable77 est-il dans le formulaire principal ou le sous-formulaire ?

A+

programme est le formulaire de navigation principale qui s'ouvre à l'ouverture du programme.
les onglets de navigation on comme sous formulaire "SousForm"
chaques onglets contient un formulaire ex: accueil, client, rapports...
modifiable77 est dans le formulaire client, sous l'onglet Client.

Bonjour à vous 2 !

Voici la syntaxe :

Code:

---

1 2 3 4

Forms!programe!SousForm.Form.Modifiable77.value = Noclient     Forms!FormulairePrincipal.Modifiable77.value = Noclient

---

Si ca ne fonctionne pas je croit qu'il faut donner le focus au sous-formulaire avant Lien d'un post déja créer ICI:

Code:

---

1 2	me.monsousform.setfocus me.monsousform.form!monctl.value = Noclient

---

Rebonjour, je n'y arrive pas, mais je fais des découvertes à propos des formulaires de navigation. En fait j'ai des formulaires imbriqués. En voici la structure:

1er niveau--frmPrograme--: s'ouvre à l'ouverture du programe.
2è niveau--frmSousForm--
3è niveau--frmAccueil--, --frmClient--, --frmRapports-- :selon le bouton de navigation sélectionné.

Le problème est que le code est dans les formulaire de 3ème niveau et que les formulaires de 3ème niveau ne peuvent s'appeler l'un l'autre. Je dois donc remonter au premier niveau (ou utiliser un module), pour emmagasiner ma variable et ensuite changer de formulaire et le mettre à jour (mon but étant de garder le #de client sur Accueil, et de faire apparaitre sa fiche dans l'onglet Client). Comme indiqué dans ton post, il faut rafraichir le formulaire actif... tout cela à l'aire bien logique.!!!

Or, j'ai utilisé les lignes ci-dessous pour changer l'onglet sélectionné et ça fonctionnait bien. Par contre, ça fonctionne tant que je ne rajoute pas de code pour manipuler les valeurs de mon autre formulaire. J'obtiens l'erreure suivante (la méthode Item de l'objet Forms a échoué). EN fait, j'ai refais 3 nouvelles bases de données, avec des menus de navigations, et je n'arrive pas, au clic d'un listbox, à changer de bouton en trainant le ID du listbox...

Code:

---

1 2	Forms!programe.ContrôleNavigation0.Tabs(1).SetFocus SendKeys "{Enter}"

---

Je commence à penser à mettre une boite à onglet à place ;)

Gorj

Citation:

---

je ne rajoute pas de code pour manipuler les valeurs de mon autre formulaire.

---

Quel code ?

Au passage l'utilisation de SendKey dans une application Access n'est généralement pas la meilleure méthode pour faire ce qu'on veut. Pourrais-tu expliquer à quoi sert ton dernier code ?

A+

Je pense qu'à l'aide d'un module je dois faire quelque chose du genre...

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

'Obtenir le ID du client dim var1 as integer var1 = Forms!programe!SousForm.form.liste3   'Changer d'onglet Forms!programe.ContrôleNavigation0.Tabs(1).SetFocus SendKeys "{Enter}"   'Rafraichir le contenu du sous formulaire... je sais pas trop comment encore..!   'Passer le ID du client au nouveau formulaire Forms!programe!SousForm.form.modifiable77 = var1

---

onglet de départ qui doit retenir le ID du client.
Pièce jointe 100809
Onglet suivant, qui doit affecter le ID au Modifiable77.
Pièce jointe 100810

Merci, à+.

À quoi sert 'Modifiable77' ?

Juste à afficher le client choisi ?

A+

oui, mais le reste du formulaire sera à populer aussi (nom, adresse...). Donc ça va me prendre aussi un recordset, ou appeler la fonction Modifiable77_click.

Si tu veux activer un événement d'un autre formulaire la solution la plus simple et la plus 'propre' consiste à rendre la procédure publique.

Code:

---

public sub MaListe_AfterMAJ

---

et de l'appeller dans le code

Code:

---

call forms![NomTonForm].MaLsiteAfterMAJ

---

Par contre je en saisie ton allusion au RecordSet.

A+