Discussion :

[jajoju]

Bonjour
J'ai un formulaire avec une zone de texte date (image )
Comment fait-on pour qu'à chaque nouvelle année la propriété date se change automatiquement ?
En ce moment je dois entrer la date manuellement à chaque nouvelle année dans la case donnée valeur par défaut ( ex. : 01-01-19 )
Quelle expression dois-je taper pour éviter de ré-écrire chaque année la nouvelle date ?

Merci
Jacques

[hyperion13]

Salut

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=Year(Now())

[tee_grandbois]

bonjour hyperion13,
pourquoi Year() ?
sinon pour avoir la date sans l'heure (qui est affichée qu'on on utilise Now()), il y a: Date()

[hyperion13]

bonjour hyperion13,
pourquoi Year() ?
sinon pour avoir la date sans l'heure (qui est affichée qu'on on utilise Now()), il y a: Date()

Salut tee_grandbois
Et bien j'ai fait une fixette sur nouvelle année. Je vais mettre ça sur le compte de la fatigue

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Valeur par défaut = Date()

[jajoju]

Merci de me répondre.

Pour faire suite , ça fonctionne à moitié. Quand j'ouvre le formulaire en question une première fois, aucun montant n'apparaît ( image ).
Il faut que j'ouvre la fenêtre une 2e fois pour que le montant apparaisse ... Merci encore Jacques

[jajoju]

Bonjour

Je me rends que ça ne peut pas fonctionner parce que il faut absolument que les 2 variables soient #01-01-19# et #31-12-19#
Il faut qu'en ouvrant le formulaire la période de temps soit lue entre ces 2 dates ... Le problème c'est qu'à chaque nouvelle année , je dois manuellement
les changer ces dates dans les propriétés ... Merci !!

[hyperion13]

Y-a-t-il une motivation particulière pour que l'ensemble des objets (textbox, combobox et listbox) de votre form soient indépendants ?

Si votre combobox est alimentée par des millésime, autant faire en sorte que l'année des dates de votre listbox soit égale au millésime de votre combobox !

Sinon source contrôle :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
textbox1 =SérieDate([combobox];1;1)
textbox2 =SérieDate([combobox];12;31)

[jajoju]

Bonjour !
Je n'ai aucune motivation particulière pour que des objets (textbox, combobox et listbox) soient indépendants ?
Mon niveau "débutant-intermédiaire moyen" se limite à quelques fonctions et propriétés.
J'y vais au pif me guidant avec une certaine logique et le résultat est quand même acceptable ... Le programme en général fonctionne bien.
Jusque que souvent je passe pas quelques acrobaties pour arriver à un résultat qui fonctionne malgré tout.
C'est comme se rendre à Nice de Nantes en passant par Paris. On y arrive quand même.
Ces fonctions :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
textbox1 =SérieDate([combobox];1;1)
textbox2 =SérieDate([combobox];12;31) 
...

Est-ce qu'elles doivent apparaître dans la page de propriétés ou dans
la page de codes VB du formulaire ?
Merci
Jacques Canada ( -20 C ici)

[Robert1957]

Bonjour jajoju, hyperion13, tee_grandbois,

Si j'ai bien compris ce que tu désires il faut mettre dans valeur par défaut:
=Année(Date()) & "-01-01" pour avoir le premier janvier de l'année en cours
=Année(Date()) & "-12-31" pour avoir le 31 décembre de l'année en cours selon le système.

Bonne journée

[jajoju]

Merci, ça fonctionne à la perfection !!! .... Je viens d'avancer d'un autre pas dans mon apprentissage !!

Bonne journée vous tous !

Jacques
Vaudreuil-Dorion, Québec