Code VBA Access pour obtenir aaaammjjhhmmss à partir de now()

Résolu
doublem93 Messages postés 337 Date d'inscription   Statut Membre Dernière intervention   -  
doublem93 Messages postés 337 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je souhaiterais avoir le code vba permettant d'inscrire dans un champ que je vais nommer IdAR la date et l'heure système sous un format texte de ce type AAAAMMJJHHMMSS au moment où je clique sur le bouton.

Ex : Si la date système indique que 18/06/2016 13:18:27, je voudrais obtenir 20160618131827

Merci pour votre aide
A voir également:

1 réponse

le meruvien Messages postés 1130 Date d'inscription   Statut Membre Dernière intervention   40
 
bonjour,
Voila! c'est peut etre pas élégent, mais ça marche!
J'ai mis 3 champs, qui peuvent bien sur être cachés!
1) il prend la date la date et l'heure: =Date() & Temps()
2) il enlève les barres /
3) il enlève les :
le 4eme, est le premier champ de ton formulaire, et a la propriété sur réception de focus, tu met:
Texte2 = Replace(Texte0, "/", "")
Texte3 = Replace(Texte2, ":", "")

Donc a l'ouverture de ton form, dans le champ texte3, il affiche ce que tu veut!
Si tu veut plus d'explication, je suis chez free, et mon ID est vdb.roger
Roger
0
doublem93 Messages postés 337 Date d'inscription   Statut Membre Dernière intervention   72
 
Bonsoir et merci pour votre aide.

J'ai trouvé le code suivant
Sur un Command click

Private Sub Commande8_Click()
Me![IdLRAR].Value = Format(Date, "yyyymmdd" ) & Format( Time, "HhNnSs" )
End Sub

Donc quand je clique sur le bouton, j'obtiens bien dans le champ IdLRAR la donnée date et heure système de l'instant où je clique sur le bouton sous la forme 20160618131827.
0