Bonjour à tous
Avec Access 2003, je souhaiterais à partir d'un formulaire
en ouvrir un autre et faire comme si dans le nouveau formulaire
je cliquais sur un bouton qui va exécuter du code,
c'est à dire qu'après l'ouverture du formilaire appelé,
s'éxécute de code suivant :
Private Sub ASF_Suivis_Click()
MonSF = "SF_Dossier_Suivis"
ASF
Me!ASF_Suivis.ForeColor = 255
End Sub
Public Function ASF()
Me!MSF.SourceObject = MonSF
Me!MSF.LinkChildFields = "CléP_Dossier" 'Sil ny a pas de liaison, mets
une chaîne vide ("") à la place
Me!MSF.LinkMasterFields = "CléP_Dossier"
Me!MSF.Form.Requery
Me.Requery
Me!ASF_EtatCivil.ForeColor = 0
Me!ASF_FormationsEmplois.ForeColor = 0
Me!ASF_Entretiens.ForeColor = 0
Me!ASF_EngagementsPrêts.ForeColor = 0
Me!ASF_Actions.ForeColor = 0
Me!ASF_Orientations.ForeColor = 0
Me!ASF_Aides.ForeColor = 0
Me!ASF_Suivis.ForeColor = 0
Me!ASF_Conclusion.ForeColor = 0
MonSF = Null
End Function
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Eric
Bonjour,
Il doit y avoir mieux mais ça ne me vient pas à l'esprit: Private Sub Commande1_Click() ' CommandButton dans le 1er form DoCmd.OpenForm "NouveauForm" Forms("NouveauForm")!ASF_Suivis.SetFocus SendKeys "{ENTER}" End Sub
Bonjour à tous Avec Access 2003, je souhaiterais à partir d'un formulaire en ouvrir un autre et faire comme si dans le nouveau formulaire je cliquais sur un bouton qui va exécuter du code, c'est à dire qu'après l'ouverture du formilaire appelé, s'éxécute de code suivant :
Private Sub ASF_Suivis_Click() MonSF = "SF_Dossier_Suivis" ASF Me!ASF_Suivis.ForeColor = 255 End Sub ...
Merci par avance pour votre aide Paul
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour,
Il doit y avoir mieux mais ça ne me vient pas à l'esprit:
Private Sub Commande1_Click() ' CommandButton dans le 1er form
DoCmd.OpenForm "NouveauForm"
Forms("NouveauForm")!ASF_Suivis.SetFocus
SendKeys "{ENTER}"
End Sub
Bonjour à tous
Avec Access 2003, je souhaiterais à partir d'un formulaire
en ouvrir un autre et faire comme si dans le nouveau formulaire
je cliquais sur un bouton qui va exécuter du code,
c'est à dire qu'après l'ouverture du formilaire appelé,
s'éxécute de code suivant :
Private Sub ASF_Suivis_Click()
MonSF = "SF_Dossier_Suivis"
ASF
Me!ASF_Suivis.ForeColor = 255
End Sub
...
Merci par avance pour votre aide
Paul
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Il doit y avoir mieux mais ça ne me vient pas à l'esprit: Private Sub Commande1_Click() ' CommandButton dans le 1er form DoCmd.OpenForm "NouveauForm" Forms("NouveauForm")!ASF_Suivis.SetFocus SendKeys "{ENTER}" End Sub
Bonjour à tous Avec Access 2003, je souhaiterais à partir d'un formulaire en ouvrir un autre et faire comme si dans le nouveau formulaire je cliquais sur un bouton qui va exécuter du code, c'est à dire qu'après l'ouverture du formilaire appelé, s'éxécute de code suivant :
Private Sub ASF_Suivis_Click() MonSF = "SF_Dossier_Suivis" ASF Me!ASF_Suivis.ForeColor = 255 End Sub ...
Merci par avance pour votre aide Paul
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
