Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access DefaultValue

DefaultValue

7 réponses
Avatar
Yves Chabirand
Bonjour,
Dans l'entete d'un formulaire j'ai un controle fRdVm non lié a une table
je souhaite juste y stocker une valeur récupérable d'une ouverture a l'autre
de ma base, j'utilise donc la méthode de mise a jour dans le defaultValue de
ce controle
je fais donc ça dans l'évenement lostfocus, mais ça ne marche pas
le defaultvalue n'est pas mémorisé apres fermeture du formulaire... Pourquoi
?

[code ci-dessous]
Private Sub fRdVm_lostfocus()
Me.fRdVm.DefaultValue = """" & Me.fRdVm & """" ' pour alpha
Me.fRdVm.DefaultValue = Me.fRdVm ' pour
numérique
End Sub


Merci

Yves Chabirand
Signaler un problème avec ce contenu

7 réponses

Supprimer
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
Avatar
Raymond [mvp]
Bonjour.

essaie de placer:
DoCmd.RunCommand acCmdSave
juste après le chargement de la valeur par défaut.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Yves Chabirand" <yves.chabirand@(supprimer ceci)francetelecom.com> a écrit
dans le message de news: cjtolf$
Bonjour,
Dans l'entete d'un formulaire j'ai un controle fRdVm non lié a une table
je souhaite juste y stocker une valeur récupérable d'une ouverture a
l'autre
de ma base, j'utilise donc la méthode de mise a jour dans le defaultValue
de
ce controle
je fais donc ça dans l'évenement lostfocus, mais ça ne marche pas
le defaultvalue n'est pas mémorisé apres fermeture du formulaire...
Pourquoi
?

[code ci-dessous]
Private Sub fRdVm_lostfocus()
Me.fRdVm.DefaultValue = """" & Me.fRdVm & """" ' pour alpha
Me.fRdVm.DefaultValue = Me.fRdVm ' pour
numérique
End Sub


Merci

Yves Chabirand




Avatar
Ilan
Bonjour Yves,

Je pense que tu dois enregistrer les modifications apporter a ton formulaire
pour que ce soit pris en compte.

A la femerture du formulaire
DoCmd.Close acForm,Form.name,acSaveYes



Bonjour,
Dans l'entete d'un formulaire j'ai un controle fRdVm non lié a une table
je souhaite juste y stocker une valeur récupérable d'une ouverture a l'autre
de ma base, j'utilise donc la méthode de mise a jour dans le defaultValue de
ce controle
je fais donc ça dans l'évenement lostfocus, mais ça ne marche pas
le defaultvalue n'est pas mémorisé apres fermeture du formulaire... Pourquoi
?

[code ci-dessous]
Private Sub fRdVm_lostfocus()
Me.fRdVm.DefaultValue = """" & Me.fRdVm & """" ' pour alpha
Me.fRdVm.DefaultValue = Me.fRdVm ' pour
numérique
End Sub


Merci

Yves Chabirand





Avatar
Yves Chabirand
ça ne fonctionne pas plus.
J'ai essayé de voir s'il y avait des propriétés du formulaire a modifier
pour que cette mise a jour de defaultValue fonctionne mais je n'ai toujours
pas trouvé.
Yves C

"Raymond [mvp]" a écrit dans le message news:
#
Bonjour.

essaie de placer:
DoCmd.RunCommand acCmdSave
juste après le chargement de la valeur par défaut.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Yves Chabirand" <yves.chabirand@(supprimer ceci)francetelecom.com> a
écrit

dans le message de news: cjtolf$
Bonjour,
Dans l'entete d'un formulaire j'ai un controle fRdVm non lié a une table
je souhaite juste y stocker une valeur récupérable d'une ouverture a
l'autre
de ma base, j'utilise donc la méthode de mise a jour dans le
defaultValue


de
ce controle
je fais donc ça dans l'évenement lostfocus, mais ça ne marche pas
le defaultvalue n'est pas mémorisé apres fermeture du formulaire...
Pourquoi
?

[code ci-dessous]
Private Sub fRdVm_lostfocus()
Me.fRdVm.DefaultValue = """" & Me.fRdVm & """" ' pour alpha
Me.fRdVm.DefaultValue = Me.fRdVm ' pour
numérique
End Sub


Merci

Yves Chabirand








Avatar
Ilan
Tu n'affectes le DefaultValue que si le controle perd le focus mais s'il ne
l'a jamais eu.
Essaie en ecrivant ton code dans l'evenement Fermeture du formulaire.




ça ne fonctionne pas plus.
J'ai essayé de voir s'il y avait des propriétés du formulaire a modifier
pour que cette mise a jour de defaultValue fonctionne mais je n'ai toujours
pas trouvé.
Yves C

"Raymond [mvp]" a écrit dans le message news:
#
Bonjour.

essaie de placer:
DoCmd.RunCommand acCmdSave
juste après le chargement de la valeur par défaut.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Yves Chabirand" <yves.chabirand@(supprimer ceci)francetelecom.com> a
écrit

dans le message de news: cjtolf$
Bonjour,
Dans l'entete d'un formulaire j'ai un controle fRdVm non lié a une table
je souhaite juste y stocker une valeur récupérable d'une ouverture a
l'autre
de ma base, j'utilise donc la méthode de mise a jour dans le
defaultValue


de
ce controle
je fais donc ça dans l'évenement lostfocus, mais ça ne marche pas
le defaultvalue n'est pas mémorisé apres fermeture du formulaire...
Pourquoi
?

[code ci-dessous]
Private Sub fRdVm_lostfocus()
Me.fRdVm.DefaultValue = """" & Me.fRdVm & """" ' pour alpha
Me.fRdVm.DefaultValue = Me.fRdVm ' pour
numérique
End Sub


Merci

Yves Chabirand













Avatar
Yves Chabirand
Si.
Je veux modifier le defaultvalue pour valider une modif de ce controle donc
forcément en me positionnant dessus d'ou getfocus puis lostfocus.
Yves

"Ilan" a écrit dans le message news:

Tu n'affectes le DefaultValue que si le controle perd le focus mais s'il
ne

l'a jamais eu.
Essaie en ecrivant ton code dans l'evenement Fermeture du formulaire.




ça ne fonctionne pas plus.
J'ai essayé de voir s'il y avait des propriétés du formulaire a modifier
pour que cette mise a jour de defaultValue fonctionne mais je n'ai
toujours


pas trouvé.
Yves C

"Raymond [mvp]" a écrit dans le message
news:


#
Bonjour.

essaie de placer:
DoCmd.RunCommand acCmdSave
juste après le chargement de la valeur par défaut.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Yves Chabirand" <yves.chabirand@(supprimer ceci)francetelecom.com> a
écrit

dans le message de news: cjtolf$
Bonjour,
Dans l'entete d'un formulaire j'ai un controle fRdVm non lié a une
table




je souhaite juste y stocker une valeur récupérable d'une ouverture a
l'autre
de ma base, j'utilise donc la méthode de mise a jour dans le
defaultValue


de
ce controle
je fais donc ça dans l'évenement lostfocus, mais ça ne marche pas
le defaultvalue n'est pas mémorisé apres fermeture du formulaire...
Pourquoi
?

[code ci-dessous]
Private Sub fRdVm_lostfocus()
Me.fRdVm.DefaultValue = """" & Me.fRdVm & """" ' pour alpha
Me.fRdVm.DefaultValue = Me.fRdVm ' pour
numérique
End Sub


Merci

Yves Chabirand















Avatar
Ilan
Bonjour Yves,
Tu as tout a fait raison, desole.


Si.
Je veux modifier le defaultvalue pour valider une modif de ce controle donc
forcément en me positionnant dessus d'ou getfocus puis lostfocus.
Yves

"Ilan" a écrit dans le message news:

Tu n'affectes le DefaultValue que si le controle perd le focus mais s'il
ne

l'a jamais eu.
Essaie en ecrivant ton code dans l'evenement Fermeture du formulaire.




ça ne fonctionne pas plus.
J'ai essayé de voir s'il y avait des propriétés du formulaire a modifier
pour que cette mise a jour de defaultValue fonctionne mais je n'ai
toujours


pas trouvé.
Yves C

"Raymond [mvp]" a écrit dans le message
news:


#
Bonjour.

essaie de placer:
DoCmd.RunCommand acCmdSave
juste après le chargement de la valeur par défaut.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Yves Chabirand" <yves.chabirand@(supprimer ceci)francetelecom.com> a
écrit

dans le message de news: cjtolf$
Bonjour,
Dans l'entete d'un formulaire j'ai un controle fRdVm non lié a une
table




je souhaite juste y stocker une valeur récupérable d'une ouverture a
l'autre
de ma base, j'utilise donc la méthode de mise a jour dans le
defaultValue


de
ce controle
je fais donc ça dans l'évenement lostfocus, mais ça ne marche pas
le defaultvalue n'est pas mémorisé apres fermeture du formulaire...
Pourquoi
?

[code ci-dessous]
Private Sub fRdVm_lostfocus()
Me.fRdVm.DefaultValue = """" & Me.fRdVm & """" ' pour alpha
Me.fRdVm.DefaultValue = Me.fRdVm ' pour
numérique
End Sub


Merci

Yves Chabirand




















Avatar
Ilan
Re,
apres test je n'y arrive pas non plus, la seule solution que j'ai trouve est
de placer
une Constante dans le module du formulaire.
A chaque fois que la valeur FrdVm est modifiee, la constante est reaffectee.
Au chargement du formulaire il faut affecter la constante au control FrdVm

Const Defaut = TaValeurParDefaut

Sub Form_Load
FrdVm.valueÞfaut
end sub

Sub Frvdm_AfterUpDate
Fom.Module.ReplaceLine x,"Const Defaut = " & FrdVm.Value
' x represente le numero de la ligne - la premiere etant la ligne 1
Docmd.Save acForm,Form.Name
End sub


Bonjour Yves,
Tu as tout a fait raison, desole.


Si.
Je veux modifier le defaultvalue pour valider une modif de ce controle donc
forcément en me positionnant dessus d'ou getfocus puis lostfocus.
Yves

"Ilan" a écrit dans le message news:

Tu n'affectes le DefaultValue que si le controle perd le focus mais s'il
ne

l'a jamais eu.
Essaie en ecrivant ton code dans l'evenement Fermeture du formulaire.




ça ne fonctionne pas plus.
J'ai essayé de voir s'il y avait des propriétés du formulaire a modifier
pour que cette mise a jour de defaultValue fonctionne mais je n'ai
toujours


pas trouvé.
Yves C

"Raymond [mvp]" a écrit dans le message
news:


#
Bonjour.

essaie de placer:
DoCmd.RunCommand acCmdSave
juste après le chargement de la valeur par défaut.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Yves Chabirand" <yves.chabirand@(supprimer ceci)francetelecom.com> a
écrit

dans le message de news: cjtolf$
Bonjour,
Dans l'entete d'un formulaire j'ai un controle fRdVm non lié a une
table




je souhaite juste y stocker une valeur récupérable d'une ouverture a
l'autre
de ma base, j'utilise donc la méthode de mise a jour dans le
defaultValue


de
ce controle
je fais donc ça dans l'évenement lostfocus, mais ça ne marche pas
le defaultvalue n'est pas mémorisé apres fermeture du formulaire...
Pourquoi
?

[code ci-dessous]
Private Sub fRdVm_lostfocus()
Me.fRdVm.DefaultValue = """" & Me.fRdVm & """" ' pour alpha
Me.fRdVm.DefaultValue = Me.fRdVm ' pour
numérique
End Sub


Merci

Yves Chabirand