Discussion :

[LiseUEMPT]

Bonjour

Ça fait plus 1 heure que je teste différente syntaxe pour ouvrir un formulaire onglet sur le 2e onglet.
Et je n'y arrive pas!

Code :

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

     DoCmd.OpenForm "Menuonglet", acNormal

Cette ligne de code ouvre mon formulaire sur le premier onglet. Ce que je veux c'est le 2e. Alors j'ai fait différent test sans succès. Voici les codes que j'ai essayé :

Code :

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

1
2
3
4
5
6
7
8
9
1.  DoCmd.OpenForm Forms![Menuonglet]![Mars].Value = 1
 
2.  Me![Menuonglet].Pages(1).SetFocus
 
3.  Me![Menuonglet].Value = 1
 
4.  Forms![Menuonglet]![Mars].Value = 1
 
5.  DoCmd.OpenForm Forms![Menuonglet]![Mars].Value = 1

Est-ce que vous pouvez m'éclairer pour connaître la bonne syntaxe, la bonne formule enfin pour arriver à atteindre le 2e onglet?

Merci de votre précieuse aide.

Bonne journée

[Robert1957]

Bonjour LiseUEMPT,

Code :

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

1
2
3
Private Sub Form_Load()
Me.ctlTonControle.Pages(1).SetFocus
End Sub

Page 1 parce que le départ est 0.

Bonne journée

[LiseUEMPT]

Bonjour Robert1957

Merci pour votre réponse, mais j'avais aussi essayer cette option. Mais ce n'est pas ce que je cherche.

Je pars d'un formulaire Menu, qui permet d'inscrire des données, et je veux ouvrir un autre formulaire MenuRapport à onglets, pour les rapports, sur l'onglet Mars, page 1. (Décembre onglet 1, page 0 et Juin onglet 3, page 20

Alors d'inscrire votre proposition de code dans le formulaire MenuRapport ne fait pas ce que je désire.

J'ai pensé à utiliser un OpenArgs mais je ne sais pas comment m'y prendre.

Merci de votre collaboration

[Robert1957]

Bonjour LiseUEMPT,

Donc si la question est de faire cela à partir du formulaire "Menu" pour le formulaire "MenuRapport" et que le contrôle onglet se nomme "ctlTonControle" voici le code:

Code :

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

1
2
DoCmd.OpenForm "MenuRapport"
Forms!MenuRapport.Form.ctlTonControle.Pages(1).SetFocus

La référence pour les pages n'est pas le nom que Access donne aux pages mais plutôt le "PageIndex" ou "Index page" en français qui commence à 0 et s'incrémente pour chaque page suivante.

Bonne journée

[LiseUEMPT]

Bonjour Robert1957

Merci pour votre réponse.

J'ai testé mais ça ne fonctionne toujours pas, j'ai comme erreur : "L'objet ne prend pas en charge cette propriété ou cette méthode (Erreur 438)"

Voici le code que j'ai inscrit :

Code :

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

1
2
      DoCmd.OpenForm "MenuRapport"
      Forms!MenuRapport.Form.Mars.Pages(1).SetFocus

Mars étant le nom de l'onglet sur lequel je veux ouvrir le formulaire MenuRapport

Si vous avez une solution, j'apprécierai.

Bonne soirée

[tee_grandbois]

bonsoir,

Mars étant le nom de l'onglet sur lequel je veux ouvrir le formulaire MenuRapport

Mars, est-ce le contrôle onglet (le contrôle contenant les pages) ou le nom d'une page ?

Code :

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

Forms!MenuRapport.ControleOnglet.Pages("Mars").SetFocus

Le plus simple aurait été une impression d'écran dès le début ...

[tee_grandbois]

un onglet:



une page:

[LiseUEMPT]

Bonjour,
Merci pour les réponses. Au xième essai, j'ai eu une erreur 2465 'Erreur définie par l’objet ou l’application'.
Et j’ai fouillé encore puis j’ai regardé attentivement l’info de tee_grandbois sur les propriétés du formulaire - contrôles onglets et pages. J'ai confondu onglet et page « Pas facile de manipuler en VBA les formulaires onglet - page.»
Plus j’apprends en VBA et plus, je réalise qu’il me reste encore beaucoup trop à apprendre.





Je ne comprenais pas l’importance du nom de l'onglet. Alors, à partir du code de Robert1957, j’ai inscrit CtlTab43 à la place de ControleOnglet et là ça fonctionne. Je n’avais pas saisi la subtilité de ce nom dans la feuille de propriété. Ni comment écrire la syntaxe de la ligne de commande.

Merci Robert1957 pour le conseil, à l’avenir je mettrais une image des formulaires et j’essaierais de préciser les étapes.

Encore merci pour tout.