OVH Cloud OVH Cloud

recopier des données dans "x" formulaires

4 réponses
Avatar
Chantal PRAMAYON
Bonjour,
J'ai un formulaire qui se nomme "grille" deux autres formulaires
complètement indépendants les uns des autres, l'un que l'on nommera form1 et
l'autre form2 .
J'utilise selon les besoins de mon travail le form1 ou le form2 qui n'ont
aucuns liens, mais dans ces deux forms j'ai un champs dont les données se
trouvent dans mon formulaire "grille". Selon les cas je fais appel à mon
formulaire "grille" et je choisis dans les chams le champs qui va remplir
mon champs dans le form1 ou 2 ma question est : comment lui dire que sur
clic du champs choisis dans mon form "grille" qu'il soit recopier dans le
champs du formulaire qui est ouvert à ce moment la sans avoir besoin de lui
écrire le nom du formulaire sachant que le champs destinataire porte le même
nom dans l'un et l'autre des forms1 ou 2 ????sachant également que mes
forms1 ou 2 ne sont et ne seront jamais utilisés en même temps.....
Si je n'utilisais que le form1 j'aurais écris ceci :

Private Sub IndiceBrut_Click()
Forms!Form1!indice_brut = Me.IndiceBrut
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

Par avance Merci

URIANE

4 réponses

Avatar
ze_titi
Bonjour,

si tu utilises Access 2003, utilise la propriété IsLoaded:

Private Sub IndiceBrut_Click()
If AllForms("Form1").IsLoaded Then
Forms!Form1!indice_brut = Me.IndiceBrut
Else
Forms!Form2!indice_brut = Me.IndiceBrut
End If
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour,
J'ai un formulaire qui se nomme "grille" deux autres formulaires
complètement indépendants les uns des autres, l'un que l'on nommera form1 et
l'autre form2 .
J'utilise selon les besoins de mon travail le form1 ou le form2 qui n'ont
aucuns liens, mais dans ces deux forms j'ai un champs dont les données se
trouvent dans mon formulaire "grille". Selon les cas je fais appel à mon
formulaire "grille" et je choisis dans les chams le champs qui va remplir
mon champs dans le form1 ou 2 ma question est : comment lui dire que sur
clic du champs choisis dans mon form "grille" qu'il soit recopier dans le
champs du formulaire qui est ouvert à ce moment la sans avoir besoin de lui
écrire le nom du formulaire sachant que le champs destinataire porte le même
nom dans l'un et l'autre des forms1 ou 2 ????sachant également que mes
forms1 ou 2 ne sont et ne seront jamais utilisés en même temps.....
Si je n'utilisais que le form1 j'aurais écris ceci :

Private Sub IndiceBrut_Click()
Forms!Form1!indice_brut = Me.IndiceBrut
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

Par avance Merci

URIANE





Avatar
URIANE
Bonjour "ze_titi",
J'utilise ACCESS 2000 que dois-je utiliser comme propriété ???
URIANE
"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message de
news:
Bonjour,

si tu utilises Access 2003, utilise la propriété IsLoaded:

Private Sub IndiceBrut_Click()
If AllForms("Form1").IsLoaded Then
Forms!Form1!indice_brut = Me.IndiceBrut
Else
Forms!Form2!indice_brut = Me.IndiceBrut
End If
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour,
J'ai un formulaire qui se nomme "grille" deux autres formulaires
complètement indépendants les uns des autres, l'un que l'on nommera form1
et
l'autre form2 .
J'utilise selon les besoins de mon travail le form1 ou le form2 qui n'ont
aucuns liens, mais dans ces deux forms j'ai un champs dont les données se
trouvent dans mon formulaire "grille". Selon les cas je fais appel à mon
formulaire "grille" et je choisis dans les chams le champs qui va remplir
mon champs dans le form1 ou 2 ma question est : comment lui dire que sur
clic du champs choisis dans mon form "grille" qu'il soit recopier dans le
champs du formulaire qui est ouvert à ce moment la sans avoir besoin de
lui
écrire le nom du formulaire sachant que le champs destinataire porte le
même
nom dans l'un et l'autre des forms1 ou 2 ????sachant également que mes
forms1 ou 2 ne sont et ne seront jamais utilisés en même temps.....
Si je n'utilisais que le form1 j'aurais écris ceci :

Private Sub IndiceBrut_Click()
Forms!Form1!indice_brut = Me.IndiceBrut
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

Par avance Merci

URIANE







Avatar
ze_titi
Ach, ça se complique un chouia alors...

Dans un module quelconque, il faut enregistrer la fonction suivante:

Function isLoaded(strForm As String) As Boolean
Dim frm As Form
isLoaded = False
For Each frm In Forms
If frm.Name = strForm Then isLoaded = True
Next
End Function

et à la place du code de tout à l'heure, tu mets:

Private Sub IndiceBrut_Click()
If isLoaded("Form1") Then
Forms!Form1!indice_brut = Me.IndiceBrut
Else
Forms!Form2!indice_brut = Me.IndiceBrut
End If
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour "ze_titi",
J'utilise ACCESS 2000 que dois-je utiliser comme propriété ???
URIANE
"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message de
news:
Bonjour,

si tu utilises Access 2003, utilise la propriété IsLoaded:

Private Sub IndiceBrut_Click()
If AllForms("Form1").IsLoaded Then
Forms!Form1!indice_brut = Me.IndiceBrut
Else
Forms!Form2!indice_brut = Me.IndiceBrut
End If
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour,
J'ai un formulaire qui se nomme "grille" deux autres formulaires
complètement indépendants les uns des autres, l'un que l'on nommera form1
et
l'autre form2 .
J'utilise selon les besoins de mon travail le form1 ou le form2 qui n'ont
aucuns liens, mais dans ces deux forms j'ai un champs dont les données se
trouvent dans mon formulaire "grille". Selon les cas je fais appel à mon
formulaire "grille" et je choisis dans les chams le champs qui va remplir
mon champs dans le form1 ou 2 ma question est : comment lui dire que sur
clic du champs choisis dans mon form "grille" qu'il soit recopier dans le
champs du formulaire qui est ouvert à ce moment la sans avoir besoin de
lui
écrire le nom du formulaire sachant que le champs destinataire porte le
même
nom dans l'un et l'autre des forms1 ou 2 ????sachant également que mes
forms1 ou 2 ne sont et ne seront jamais utilisés en même temps.....
Si je n'utilisais que le form1 j'aurais écris ceci :

Private Sub IndiceBrut_Click()
Forms!Form1!indice_brut = Me.IndiceBrut
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

Par avance Merci

URIANE












Avatar
URIANE
Merci je vais me mettre au travail
A +
"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message de
news:
Ach, ça se complique un chouia alors...

Dans un module quelconque, il faut enregistrer la fonction suivante:

Function isLoaded(strForm As String) As Boolean
Dim frm As Form
isLoaded = False
For Each frm In Forms
If frm.Name = strForm Then isLoaded = True
Next
End Function

et à la place du code de tout à l'heure, tu mets:

Private Sub IndiceBrut_Click()
If isLoaded("Form1") Then
Forms!Form1!indice_brut = Me.IndiceBrut
Else
Forms!Form2!indice_brut = Me.IndiceBrut
End If
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour "ze_titi",
J'utilise ACCESS 2000 que dois-je utiliser comme propriété ???
URIANE
"ze_titi" <http://www.cerbermail.com/?sj4KuQC4GQ> a écrit dans le message
de
news:
Bonjour,

si tu utilises Access 2003, utilise la propriété IsLoaded:

Private Sub IndiceBrut_Click()
If AllForms("Form1").IsLoaded Then
Forms!Form1!indice_brut = Me.IndiceBrut
Else
Forms!Form2!indice_brut = Me.IndiceBrut
End If
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

--
Cordialement,

ze_titi

Mail perso: http://www.cerbermail.com/?sj4KuQC4GQ




Bonjour,
J'ai un formulaire qui se nomme "grille" deux autres formulaires
complètement indépendants les uns des autres, l'un que l'on nommera
form1
et
l'autre form2 .
J'utilise selon les besoins de mon travail le form1 ou le form2 qui
n'ont
aucuns liens, mais dans ces deux forms j'ai un champs dont les données
se
trouvent dans mon formulaire "grille". Selon les cas je fais appel à
mon
formulaire "grille" et je choisis dans les chams le champs qui va
remplir
mon champs dans le form1 ou 2 ma question est : comment lui dire que
sur
clic du champs choisis dans mon form "grille" qu'il soit recopier dans
le
champs du formulaire qui est ouvert à ce moment la sans avoir besoin
de
lui
écrire le nom du formulaire sachant que le champs destinataire porte
le
même
nom dans l'un et l'autre des forms1 ou 2 ????sachant également que mes
forms1 ou 2 ne sont et ne seront jamais utilisés en même temps.....
Si je n'utilisais que le form1 j'aurais écris ceci :

Private Sub IndiceBrut_Click()
Forms!Form1!indice_brut = Me.IndiceBrut
Forms!fr_lstAGENT!indice_majoré = Me.indicemaj
DoCmd.Close acForm, Me.Name
End Sub

Par avance Merci

URIANE