Mettre une valeur par défaut à partir du dernier enregistrement

Fermé
tianamimix - 20 nov. 2013 à 08:20
le meruvien Messages postés 1111 Date d'inscription vendredi 12 août 2011 Statut Membre Dernière intervention 15 avril 2024 - 20 nov. 2013 à 15:41
Bonjour à tous,

J'ai un formulaire F basé sur une table T.

Il y a 7 champs (C1, C2, C3, C4, C5, C6, C7) à remplir sur le formulaire F, et mon souci c'est comment je dois faire si je veux que lors d'un nouvel enregistrement, les champs C1, C2 et C3 prennent les valeurs du dernier enregistrement et le reste vide.

Merci.

1 réponse

le meruvien Messages postés 1111 Date d'inscription vendredi 12 août 2011 Statut Membre Dernière intervention 15 avril 2024 40
20 nov. 2013 à 15:41
bonjour, voila une méthode que j'utilise, qui fait peut-être usine à gaz pour un pro, mais qui marche trés bien!

tu met cette procédure sur ouvertur de ton formulaire.

Private Sub Form_Open(Cancel As Integer)
DoCmd.GoToRecord, , acLast 'atteind le dernier
DoCmd.DoMenuItem acFormBar,acEditMenu,8, ,acMenuVer70 ' copie
DoCmd.DoMenuItem acFormBar,acEditMenu,2, ,acMenuVer70 ' copie
DoCmd.DoMenuItem acFormBar,acEditMenu,5, ,acMenuVer70 ' colle tout les champs!
Dans ton cas, tu met:
Pour un champ: Mettre ce code dans sur chargement du formulaire.
C1.DefaultValue = "'" & [C1] & "'"
C2.DefaultValue = "'" & [C2] & "'"
C3.DefaultValue = "'" & [C3] & "'"

end sub
0