Les Trucs & Astuces Informatiques de Michel

http://michel.vergriete.perso.sfr.fr/accueil.htm
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Autopassion.net le site dédié à l'automobile créé par ses utilisateurs
Partagez | 
 

 Access 2000

Aller en bas 
AuteurMessage
alain



Nombre de messages : 5
Date d'inscription : 19/03/2007

MessageSujet: Access 2000   Lun 19 Mar - 10:36

Bonjour,

Tout d'abord merci pour la qualité et la pertinence de votre site dans lequel j'ai pas mal puisé depuis mes modestes débuts de connaissance sur Access.

Qui pourrait m'aider sur ce sujet :

J'ai 2 champs de texte "date" dans un sous/formulaire.
Dans le 1er champ je saisis la date en manuel ou avec un calendrier.

Après Mise à jour du 1er champ
Je souhaiterai que le 2e champ affiche le dernier jour de l'année égale à l'année du 1er champ.

Exemple : 1er champ je saisis 19-03-2007
le 2e champ affiche 31-12-2007

Ceci quelque soit la date jusqu'au 30-09.

Après cette date c'est-à-dire le 1er octobre je souhaite que le 2e champ affiche toujours le dernier jour de l'année soit le 31-12 + une année.

Exemple : 01-10-2007 dans le 1er champ

affiche 31-12-2008 dans le 2e champ.

Je suis depuis 3 jours dessus je craque.

Par avance merci à ceux qui voudront m'aider.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Liza60



Nombre de messages : 17
Date d'inscription : 29/03/2007

MessageSujet: Mise à jour auto de date   Jeu 29 Mar - 7:36

bounce
Bonjour
Une solution à proposer :
Date1 = la date saisie (type Date dans la table)
Date2 = la date à mettre à jour (type texte dans la table)

Dans le formulaire, dans les propriétés de date 1 :
onglet 'Evènements ; Zone 'après mise à jour ; cliquer sur le bouton ... puis choisir 'générer une macro
Nommer la macro
Dans la fenêtre de macro, dans 'Action, choisir 'DefinirValeur
en bas, dans 'element, taper le nom du champ à mettre à jour
dans 'Expression, saisir cette formule :
CDate("31/12/" & (Année([date1])+VraiFaux(Mois([date1])<=9;0;1)))
Enregistrer, fermer la fenêtre macro.

Normalement ça marche.

Bon courage pour la suite
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
alain



Nombre de messages : 5
Date d'inscription : 19/03/2007

MessageSujet: dates Access 2000   Sam 31 Mar - 11:22

Bonjour,

Merci d'avoir répondu Liza60 j'essaie et je vous tiens au courant.

Alain drunken
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
alain



Nombre de messages : 5
Date d'inscription : 19/03/2007

MessageSujet: dates Access 2000   Sam 31 Mar - 12:18

Bonsoir Liza60,

Ca marche super, à nouveau merci.

Alain Very Happy
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Access 2000   

Revenir en haut Aller en bas
 
Access 2000
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Asus ARES, 2000€ pour un CrossFire ça donne quoi ?
» Routeur Netgear 2000 RPT - Décodeur Bouygues
» Ouverture assistant installation microsoft office 2000
» Comment se débarasser des Rootkit zero access et du trojan ? [résolu]
» [Grand Espace III "INITIALE" 2.2dt, 2000]

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
Les Trucs & Astuces Informatiques de Michel :: Bureautique-
Sauter vers: