Discussion :

[CyberMen]

Bonjour,

J'ai bien vérifier sur le forum et j'ai bien trouvé le lien:
http://loufab.developpez.com/appelformulaire/

Mais j'ai tenté par plusieurs moyen d'accéder aux champs de mon sous-formulaire sans succès


Voilà la dernière tentative:
Me.Form!Form_HMR2_1_1.Form!txtStatut = "test"

Merci de m'aider

[CyberMen]

autre test non fonctionnel:

Forms.Form_HMR2_1.Form_HMR2_1_1.Form.txtStatut = "test"

[talrashha]

Salut,

Tu dois passer par le champs de sous-formulaire (appelé par défaut fille).

Dans ton formulaire, le cadre de sous formulaire est le champ dont tu te sert pour accéder au sous-formulaire. En code, cela donne :

Code :

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

1
2
 
fille0.Form.txtStatut.value = "test"

fille0 étant le nom du "champ sous-formulaire"
txtStatue le nom du champ texte du sous-formulaire

Petit détail, si c'est d'un autre formulaire (j'ai dû mal lire ^^), et bien faut faire un mix :

Code :

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

1
2
 
[forms]![formulaire_pere]![fille0].Form.txtStatut.value = "test"

est-ce cela?

[CyberMen]

Je crois pas avoir bien comprit lol

J'ai tenté
Form_HMR2_1.Form.txtStatut.value = "test"

et
Form_HMR2_1_1.Form.txtStatut.value = "test"

Sans succès

[CyberMen]

Rohhh là là, désolé c'était ma faute

C'est bel et bien
Form_HMR2_1_1_1.Form.txtStatut.value = "test"

Je croyais que le sous-formulaire s'appelait Form_HRM2_1_1 mais finalement le champs que je tentais d'accéder était dans un autre suos formulaire.

Merci beaucoup beaucoup!

[Lola Bunny]

Bonne année à tous !
(Newbie sur VB)

Je suis allé visiter le lien de Loufab, mais il n'est plus disponible ;-( Cherché pas mal partout (habituée à me débrouiller seule) et j'ai suivis scrupuleusement les instructions et tenté d'adapter mais sans succès... Alors j'écris sur le même post car ils se ressemblent sauf que...

Je tente d'accéder à un champs à partir d'un formulaire qui contient un formulaire, qui contient le sous-formulaire en question.
Voici mon code (qui fonctionne très bien avec un seul sous-formulaire mais voilà, je dois y accéder du menu) :

Où
_MenuPrincipal - est le menu
sfrmMouvEven - est le premier sous-formulaire
sfrmEven - est le deuxième sous-formulaire ou je tente de joindre EvenPourcSalaire

Code :

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

1
2
3
4
5
6
Private Sub MouvETC_Exit(Cancel As Integer)
Dim RM As Variant
RM = (((Me!MouvNBHeures / 5) * (Forms![_MenuPrincipal]![sfrm_MouvEven]![sfrmEven]![EvenPourcSalaire]) / 100) / (Me!MouvNBHeures / 5))
Me.[MouvETC] = RM
Me.Refresh
End Sub

Voici celui qui fonctionne dans un seul formulaire avec sous-formulaire :

Code :

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

1
2
3
4
5
6
Private Sub MouvETC_Exit(Cancel As Integer)
Dim RM As Variant
RM = (((Me!MouvNBHeures / 5) * (Forms![sfrm_MouvEven]![Evenements].Form![EvenPourcSalaire]) / 100) / (Me!MouvNBHeures / 5))
Me.[MouvETC] = RM
Me.Refresh
End Sub

Un gros merci à toute personne pouvant m'aider, en ce début d'année