protection macro

Bonsoir, *christian*

Avec quelle valeur comptes-tu comparer la date système ?
Avec l'éphéméride posé sur le bureau ?
Il te faudra alors une webcam.
ROFL ROFL

Blague à part, il existe des freewares qui te permettent de comparer, et
d'ajuster la date système avec les horloges atomiques.
Je n'ai plus les liens en tête, mais Google, lui, sûrement.

--
Bien amicordialement,
P. Bastard

bonjour,
J'aimerais au lancement d'une macro faire un test sur la date système
et permettre ensuite suivant le résultat le déroulement de la macro
ou non. Ex: si date système >= a hier alors exit sub
sinon
bla
bla
bla.
merci de votre aide.

Bonsoir,

Comme le dit Patrick BASTARD, il faudrait un peu plus de données car en se
basant sur ton énoncé, je te proposerais :

Sub Macro
End Sub

Pas besoin de test car la date du jour est toujours >= à celle de la veille
;-))))

Amicalement
Yoyo

"christian" <chri2la@free.fr> a écrit dans le message de
news:43f0f2b5$0$289$626a14ce@news.free.fr...

bonjour,
J'aimerais au lancement d'une macro faire un test sur la date système et
permettre ensuite suivant le résultat le déroulement de la macro ou non.
Ex: si date système >= a hier alors exit sub
sinon
bla
bla
bla.
merci de votre aide.

Bonjour,

p.e

Sub dates()

datejour = DateSerial(Year(Now), Month(Now), Day(Now))
datelimbasse = DateSerial(Year(Now), 2, 16) ' le 16 Février de
l'année en cours
datelimhaute = DateSerial(Year(Now), 4, 28) ' le 28 Avril de l'année
en cours

If datejour > datelimbasse And datejour < datelimhaute Then
'Declencher ta procédure
End If
End Sub

A+