Prochain jour ouvré

Résolu
Bonjour,
Je souhaite vérifier par une formule VBA si la date saisie dans une cellule correspond bien au prochain jour ouvré. Je souhaite donc la vérifier par rapport à la date du jour.

J'ai essayé avec aujourd'hui() et maintenant() sans succès. je pense qu'on ne peux pas saisir ces fonctions dans la formule mais je ne trouve pas comment faire.

If Range("DateEnvoi").Value <> serie.jour.ouvre(aujourdhui();1;) then msgbox "la date n'est pas le prochain jour ouvré"

Merci beaucoup pour votre aide,

Frederic

1 réponse

  1. Bonjour
    Les fonctions VBA sont en anglais et il faut passer par WorksheetFunction :
    Serie.jour.ouvre =WorkDay
    Aujourdhui()=Date
    If Range("DateEnvoi").Value <> Application.WorksheetFunction.WorkDay(Date, 1) then ......etc

    Cdlmnt

    0
    1. Merci via55,

      C'est exactement ce qu'il me fallait !!!

      Frederic
      0