Nommer Automatiquement une Période (Entête de Données)

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

Nommer Automatiquement une Période (Entête de Données)

Message par admin »

~ ~ ~ ~ ~ ~ ~ ~
Vous voulez Définir automatiquement le nom d'une période pour une date et une durée passées en paramètre.

La solution est ici: Nom_de_Période (clic-droit, enregistrer sous)

Mode d'emploi:
  • Intégrer la source fournie dans votre code
    • /!\ Attention, il vous faudra également No_Semaine_ISO pour la variante hebdomadaire
  • Faire l'appel à la fonction : Nom_de_Periode (LaDate, LaDuree, opt. PasdInfo, opt. Alerte)
    • valeur = Nom_de_Periode (LaDate, LaDuree) :
      • valeur contiendra la chaine de caractère constituée à partir de la Date et de la Durée.
    • valeur = Nom_de_Periode (LaDate, LaDuree, Alerte:=true) :
      • Se comportera comme attendu;
      • mais vérifiera que la date est bien synchronisée à la période, si ce n'est pas le cas, "!" sera ajouté en fin de nom.
      • et retournera également "!" si LaDuree n'a pas une valeur correcte.
    • valeur = Nom_de_Periode (LaDate, LaDuree, PasdInfo:=true, Alerte:=true) :
      • Se comportera comme attendu précédemment;
      • cette option n'a d'impact visible dans du code (hors d'une formule dans une cellule).
  • Où :
    • LaDate = Date de référence
    • LaDuree = Caractère permettant de spécifier la Durée : <S/M/T/A> qui déterminera le format correspondant : YYYYSXX, YYYYMXX, YYYYTX ou AYYYY.
    • PasdInfo = Booléen optionnel devant être à vrai pour qu'une alerte, ou une erreur, rencontrée ne soit pas signalée
    • Alerte = Booléen optionnel devant être à vrai pour qu'une vérification de cohérence entre la date et la période soit effectuée (alerte), ainsi qu'une conformité de LaDuree (erreur).
  • Astuce :
    • Pour appeler la fonction dans une formule, remplacer les "," par des ";" et suivre l'ordre des options :
      =Nom_de_Periode( B10 ; "M" )
      =Nom_de_Periode( B10 ; "T" ; vrai ; vrai )
  • Aperçu :
    • Aperçu de l'Utilisation de la macro comme fonction :
      Image
Suivi des évolutions:
  • 2009.10.26 (v1.00) : Création initiale. Donne le Nom de la Période définie
  • 2012.01.14 (v1.10) : Ajoute la gestion des erreurs et l'option de message
  • 2021.03.19 (v1.20) : Ajoute une nouvelle Grandeur (A: Année)
  • 2021.03.26 (v1.30) : Ajoute une Alerte optionnelle si la date est asynchrone à la période
  • 2021.04.01 (v1.31) : Correction de l'alerte sur trimestre qui pouvait ne pas se déclencher
  • 2021.10.27 (v1.32) : Meilleure gestion des erreurs et compatibilité (suppression caractères accentués)

Un nommage standardisé en format texte automatiquement...
Verrouillé