Mise a jour date si condition

Le
Guy
Bonjour à tous,

Dans un formulaire j'ai 5 dates pour le versement d'acomptes

[Acompte01] [date01] sous forme jj/mm/aa
[Acompte02] [date02]
etc

Comment automatiser le champs date0x avec la date jour si Acompte0x est > 0
evidemment ne pas ecraser les anciennes dates

Acompte01 date 01/01/01
Acompte02 date 02/03/01
Acompte03 = date du jour du versement de l'acompte
--
Amicalement et merci
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Willi2004
Le #6275861
Bonjour Guy.
Dans la feuille des propriétés du contrôle "Acompte0x", tu écris sur la
ligne "Source contrôle":
=VraiFaux(Acompte0x>0;Date();date0x)


"Guy" <André> a écrit dans le message de news:

Bonjour à tous,

Dans un formulaire j'ai 5 dates pour le versement d'acomptes

[Acompte01] [date01] sous forme jj/mm/aa
[Acompte02] [date02]
etc...

Comment automatiser le champs date0x avec la date jour si Acompte0x est >
0
evidemment ne pas ecraser les anciennes dates

Acompte01 date 01/01/01
Acompte02 date 02/03/01
Acompte03 = date du jour du versement de l'acompte
--
Amicalement et merci


Raymond [mvp]
Le #6275841
Bonjour.

tu peux calculer par code lorsque tes deux champs montant et date sont
composés

Dim I As Integer
For I = 1 To 5
If Nz(Me.Controls("acompte0" & I), 0) = 0 Then
Me.Controls("acompte0" & I) = montantacompte
Me.Controls("date0" & I) = dateversement
total = total + Me.Controls("acompte0" & I)
Exit For
Else
total = total + Me.Controls("acompte0" & I)
End If
Next I

le champ total contiendra en même temps la somme globale des acomptes
versés.
--
@+
Raymond Access MVP http://OfficeSystem.Access.free.fr/
Pour débuter sur le forum: http://www.mpfa.info/
PowerShell, une nouvelle approche de l'administration de l'environnement
Windows
http://www.comscamp.com/Tracker/Redirect.ashx?linkid_73b247-3260-4fed-861f-bb587f7ef413


"Guy" <André> a écrit dans le message de news:

| Bonjour à tous,
|
| Dans un formulaire j'ai 5 dates pour le versement d'acomptes
|
| [Acompte01] [date01] sous forme jj/mm/aa
| [Acompte02] [date02]
| etc...
|
| Comment automatiser le champs date0x avec la date jour si Acompte0x est >
0
| evidemment ne pas ecraser les anciennes dates
|
| Acompte01 date 01/01/01
| Acompte02 date 02/03/01
| Acompte03 = date du jour du versement de l'acompte
| --
| Amicalement et merci
Publicité
Poster une réponse
Anonyme