Récupérer la Date Décalée (en Jour, Semaine, Mois, Trimestre ou Année)

Solutions Développées sous VBA
Verrouillé
admin
Site Admin
Site Admin
Messages : 205
Enregistré le : 04 oct. 2020, 20:48
Contact :

Récupérer la Date Décalée (en Jour, Semaine, Mois, Trimestre ou Année)

Message par admin »

~ ~ ~ ~ ~ ~ ~ ~
Vous voulez récupérer la date (éventuellement fournie en paramètre) décalée Récupérer la Date avec un décalage (en Jour, Semaine, Mois, Trimestre ou Année) passé en paramètre.

La solution est ici: Nouvelle_Date (clic-droit, enregistrer sous)

Mode d'emploi:
  • Intégrer la source fournie dans votre code
  • Faire l'appel à la fonction : Nouvelle_Date (opt. LaDate, opt. Ajuste, opt. PasdInfo)
    • valeur = Nouvelle_Date () :
      • valeur contiendra la nouvelle date (du jour par défaut).
    • valeur = Nouvelle_Date (Ajuste:="+3S") :
      • valeur contiendra la date du jour décalée de + 3 Semaines.
    • valeur = Nouvelle_Date (UneDate, Ajuste:="-1T") :
      • valeur contiendra la date UneDate ramenée au trimestre précédent.
    • valeur = Nouvelle_Date (UneDate, UnAjustement, PasdInfo:=true) :
      • Se comportera comme attendu;
      • mais ne retournera aucun message d'erreur en cas d'erreur dans UnAjustement.
  • Où :
    • LaDate= Date optionnelle de référence (si non fournie, prend la date système)
    • Ajuste = Chaine de caractère composée du décalage attendu : <+/-><valeur><J/S/M/T/A>
    • PasdInfo = Booléen optionnel devant être à vrai pour qu'une erreur rencontrée ne soit pas signalée
Suivi des évolutions:
  • 2009.10.26 (v1.00) : Création initiale, fournit la date ajustée en fonction d'un décalage fournit
  • 2012.01.14 (v1.10) : Passe Ajuste comme variable optionnelle. Ajoute une nouvelle unité (A: Année)
  • 2021.03.19 (v1.20) : Ajoute une nouvelle unité (T: Trimestre)
  • 2021.03.26 (v1.30) : Passe LaDate comme variable optionnelle (si non fournie, prend le jour système)
  • 2021.10.11 (v1.31) : Correction de coquilles dans l'appel à la fonction et la définition de PlusMoins

Une manipulation intuitive et simplifiée des dates...
Modifié en dernier par admin le 11 oct. 2021, 16:42, modifié 2 fois.
Raison : Passage de la version v130 à v131
Verrouillé