XL 2016 fonctionnement macro suivant une période

phlaurent55

Nous a quittés en 2020

Repose en paix

• 14 Novembre 2017

• #2

Bonjour Michael,

voici un exemple de macro qui s'exécutera automatiquement à l'ouverture du fichier
pour autant que la date du jour soit comprise entre la 14 novembre et le 30 novembre inclus

Code:

Private Sub Workbook_Open()
If Date >= "14/11/2017" And Date <= "30/11/2017" Then
'
'
'
' suite de la macro
'
'
'
'
'
End If
End Sub

à+
Philippe

 

Vote positif 0 Vote négatif

M

MICHAEL

XLDnaute Occasionnel

• 14 Novembre 2017

• #3

Bonsoir Philippe
Merci de ton aide, je vais pouvoir faire quelque chose à partir de ta proposition.
penses tu que l'on pourrait remplacer 2017 par l'année en cours?

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 14 Novembre 2017

• #4

Bonsoir le fil, le forum

Sauf erreur de ma part, l'année en cours c'est 2017 😉

 

Vote positif 0 Vote négatif

M

MICHAEL

XLDnaute Occasionnel

• 15 Novembre 2017

• #5

Bonjour,

Oui, je souhaitai que cette macro fonctionne également en 2018 sans avoir à changer manuellement
l'année de la date dans le code.

cordialement

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 15 Novembre 2017

• #6

Re,

Ce code fonctionnera entre le 15 et le 30 novembre inclus de l'année en cours

Code:

Private Sub Workbook_Open()
If Date >= DateSerial(Year(Now), 11, 15) And Date <= DateSerial(Year(Now), 11, 30) Then
'
'
'
'
' suite de la macro
'
'
'
End If
End Sub

à+
Philippe

 

Vote positif 0 Vote négatif

M

MICHAEL

XLDnaute Occasionnel

• 15 Novembre 2017

• #7

bonjour
j'ai essayé d'appliquer ce code dans mon fichier sans résultat.
si vous pouviez voir cela, j'en serai ravi...
ce code pourrait s"executer à l'ouverture du fichier ou
à l'aide d'un bouton d'execution de la macro.
encore merci de votre aide.
cordialement.

 

Pièces jointes

• Nouveau Feuille de calcul Microsoft Excel.xlsm

  15.9 KB · Affichages: 17

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 15 Novembre 2017

• #8

Re,

le fichier en retour
le code s'active automatiquement ( à condition d'avoir accepté les macros à l'ouverture du fichier)

à+
Philippe

Edit: Nouvelle version du fichier

 

Pièces jointes

• 111.xlsm

  13.1 KB · Affichages: 16

Vote positif 0 Vote négatif

M

MICHAEL

XLDnaute Occasionnel

• 15 Novembre 2017

• #9

MERCI !

tout est ok. C'est exactement ce que je souhaitais.

je te souhaite une agréable soirée.

tres cordialement

 

Vote positif 0 Vote négatif