OVH Cloud OVH Cloud

Date automatique

14 réponses
Avatar
Jean Pierre GUILLEMOT
Bonjour
Je souhaite que la date s'affiche automatiquement dans le champ lorsque je
clique dans celui-ci. Je ne veux pas une valeur pas défaut. J'ai essayé dans
évènement sur clic ou double clic en indiquant = maintenant() mais çà ne
marche pas. Merci de vos explications

10 réponses

1 2
Avatar
Ghislain
Salut,

Dans l'evenement "on Click" de ton champ date tu mets :

[TaDate]Úte()

Je sais pas ce que tu veux faire mais je te conseille de faire un bouton a
cote en mettant le meme code .... parce que si tu veux changer manuellement
la date apres ca la changera a la date d'aujoud hui a chaque fois.


--
Ghislain


"Jean Pierre GUILLEMOT" wrote:

Bonjour
Je souhaite que la date s'affiche automatiquement dans le champ lorsque je
clique dans celui-ci. Je ne veux pas une valeur pas défaut. J'ai essayé dans
évènement sur clic ou double clic en indiquant = maintenant() mais çà ne
marche pas. Merci de vos explications





Avatar
Jean Pierre GUILLEMOT
Merci de tes explication. C'est exactement ce que je veux faire mettre à
jour la date en fonction d'aujourd'hui. Par contre j'ai essayé ta procédure.
Cà bug. Mon champ s'appelle date d'appel. J'ai donc sélectionné le champ.
Cliqué sur expression et dans sur clic j'ai tapé [date d'appel]Úte(). Il
me répond que la macro n'existe. Où me suis-je planté ? Merci
Avatar
Ghislain
Faut que tu tappe le code dans VBA donc surclique tu vas dans code, pas
expression.
--
Ghislain


"Jean Pierre GUILLEMOT" wrote:

Merci de tes explication. C'est exactement ce que je veux faire mettre à
jour la date en fonction d'aujourd'hui. Par contre j'ai essayé ta procédure.
Cà bug. Mon champ s'appelle date d'appel. J'ai donc sélectionné le champ.
Cliqué sur expression et dans sur clic j'ai tapé [date d'appel]Úte(). Il
me répond que la macro n'existe. Où me suis-je planté ? Merci





Avatar
Jean Pierre GUILLEMOT
Merci. Je tente et je te tiens au courant
Avatar
Jean Pierre GUILLEMOT
Bonjour,
J'ai essayé mais çà ne marche pas. J'ai sans doute oublié quelque chose.
Voici ce que j'ai saisi :

Private Sub Date_Appel_Click()
[Date d'appel] = Date

End Sub

Il ne garde pas les parenthèses après date. Faut-il mettre autre chose,
point virgule ou autre ? Merci
Avatar
Ghislain
Les parentheses apres Date

Private Sub Date_Appel_Click()

[Date d'appel] = Date()

End Sub

--
Ghislain


"Jean Pierre GUILLEMOT" wrote:

Bonjour,
J'ai essayé mais çà ne marche pas. J'ai sans doute oublié quelque chose.
Voici ce que j'ai saisi :

Private Sub Date_Appel_Click()
[Date d'appel] = Date

End Sub

Il ne garde pas les parenthèses après date. Faut-il mettre autre chose,
point virgule ou autre ? Merci





Avatar
Jean Pierre GUILLEMOT
C'est bien ce que j'ai noté mais quand je valide il ne garde pas les
parenthèses après date. Faut-il mettre autre chose, point virgule ou autre ?
Merci
Avatar
3stone
Salut,

"Jean Pierre GUILLEMOT"
| C'est bien ce que j'ai noté mais quand je valide il ne garde pas les
| parenthèses après date. Faut-il mettre autre chose, point virgule ou autre ?


En VBA on ne mets pas les parenthèses vides !


Mais tu écris :


Private Sub Date_Appel_Click()

[Date d'appel] = Date()

End Sub



or, ton champ semble se nommer [Date Appel] ???



--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Jean Pierre GUILLEMOT
Le champ s'appelle bien date d'appel. Faut-il mettre un underscore c'est à
dire date_d'appel ?
Avatar
michel
Bonjour
Vue le nom de ta procedure ton champ d'appele Date_Appel et nomdate d'appel
donc
sub date_appel_click
me![date_appel]Úte()
end sub
@plus
Michel
"Jean Pierre GUILLEMOT" a écrit dans le message de news:

Bonjour,
J'ai essayé mais çà ne marche pas. J'ai sans doute oublié quelque chose.
Voici ce que j'ai saisi :

Private Sub Date_Appel_Click()
[Date d'appel] = Date

End Sub

Il ne garde pas les parenthèses après date. Faut-il mettre autre chose,
point virgule ou autre ? Merci



1 2