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
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
A voir également:
- Mettre une valeur par défaut à partir du dernier enregistrement
- Recherche à partir d'une image - Guide
- Dernier iphone - Guide
- Comment enregistrer une video youtube - Guide
- Combien y a-t-il de bateaux dans la zone de 1500 pixels de large et 500 pixels de haut à partir du coin supérieur gauche de cette image ? - Forum Graphisme
- Annuaire portable gratuit a partir d'un nom ✓ - Forum Mobile
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
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
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