VBA + calendrier

Amnexia -  
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Avez vous un script en vba pour cacher les dates, par exemple le mois de février 2021 se termine avec le 28 puis mon calendrier repasse à 1 pour le mois suivant,
j'ai fais des recherches mais les seuls script qu'ils proposent sont avec un menu déroulant sachant que moi je ne vais pas utiliser de menu déroulant car un onglet = un mois etc etc.
J'utilise ce système car les données inscrites doivent y rester.
Merci

9 réponses

  1. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    tout est conditionné par la cellule E4 avec cette formule qui détermine le premier jour du mois
    =DATEVAL("1/"&MOIS(DATEVAL("1 "&$E$1))&"/"&BDD!F3)

    ensuite en cellule F4 cette formule incrémentée vers la droite ajoute un jour jusqu'à la fin du mois
    =SI(E4="";"";SI(MOIS(E4+1)=MOIS(DATEVAL("1 "&$E$1));E4+1;""))

    en cellule E3 cette formule incrémentée vers la droite affiche en majuscule la première lettre du jour en fonction de l'affichage de le ligne suivante
    =GAUCHE(NOMPROPRE(TEXTE(E4;"jjjj"));1)
    1
  2. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Bonjour,

    Peux tu mettre à notre disposition un exemple de ton fichier anonymisé que l'on voit sa structure s'il te plait

    1) Tu vas dans https://www.cjoint.com/
    2) Tu cliques sur [Parcourir] pour sélectionner ton fichier (15 Mo maxi)
    3) Tu défiles vers le bas pour cliquer sur le bouton bleu [Créer le lien Cjoint]
    4) Au bout de quelques secondes la deuxième page s'affiche, avec le lien en gras ; tu fais un clic-droit dessus et tu choisis "Copier le lien"
    5) Tu reviens dans ta discussion sur CCM, et dans ton message tu fais "Coller".
    =>Voir la fiche https://www.commentcamarche.net/faq/29493-utiliser-cjoint-pour-heberger-des-fichiers
    Il existe aussi :
    1) https://mon-partage.fr/
    0
  3. Amnexia
     
    Comme demandé : https://www.cjoint.com/c/JIerZFTWcSW
    0
  4. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     
    tu mentionnes VBA, s'agit-il bien de Microsoft Excel?
    0
    1. Amnexia
       
      Une erreur de ma part pour le format, nouveau lien avec le bon format : https://www.cjoint.com/c/JIetjxn7AtW
      0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     
    tu écris "un onglet = un mois etc etc.", et ton fichier n'inclut qu'un seul mis...
    que veux-tu cacher dans le fichier que tu partages?
    merci d'être précis: qu'est ce qui doit changer, et quand?
    si je vois bien, ce fichier ne contient aucun code.
    0
    1. Amnexia
       
      Alors non je ne cache rien vu qu'il n'y a rien pour le moment, je cherche à cacher les jours dépassant par exemple pour le mois de février quand le mois finit à 28 ça repasse a 1 etc, et bien je veux cacher ça quand ça reset le mois au niveau des jours en passant par du vba vu que je ne pense pas que ce soit faisable avec des fonctions
      0
      1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   1 588 > Amnexia
         
        que veux-tu, précisément, "cacher"? des cellules en ligne 4? ne te semble-t'il pas utile de montrer un onglet contenant un mois plus court?
        où peut-on trouver, dans l'onglet, une indication précise du mois concerné (numéro de l'année et numéro du mois)?
        n'hésite pas à partager toute info utile.
        "ça repasse a 1": que veux-tu dire? sois précis, qu'est ce qui repasse à un, et ou?
        0
  7. Amnexia
     
    cacher les colonnes inutiles comme les jours qui dépasse le j28 du mois de février par exemple, chaque onglet sera un mois différent mais je ne peux pas les changer ni les supprimer, ça m'évite de le faire manuellement sur chaque onglet
    0
    1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   1 588
       
      que ne peux-tu pas changer ni supprimer?
      où peut-on trouver, dans l'onglet, une indication précise du mois concerné (numéro de l'année et numéro du mois)?
      n'hésite pas à partager toute info utile.
      "ça repasse a 1": que veux-tu dire? sois précis, qu'est ce qui repasse à un, et ou?
      que se passe-t'il quand l'année change?
      0
      1. Amnexia > yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention  
         
        onglet = mois, si tu regardais dans le fichier une cellule vise le mois, l'année est importé dans l'onglet bdd encore dans le fichier il faut l'ouvrir pour comprendre, et quand le mois ce finit au 31 comme le 28 pour le mois de février après ça repasse à j1 du mois de mars.
        0
  8. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    je ne comprends pas, tu remets ton ancien fichier, mais as tu testé mes deux liens
    0
    1. Amnexia
       
      le lien que je vient de donner amène au fichier en format xlsx ce qui est le bon format pour moi ??
      0
  9. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Et bien mon premier lien est bien le fichier Excel, si tu l'avais ouvert
    https://www.cjoint.com/c/JIff7Kmiurc

    0
    1. Amnexia
       
      Ok je vois maintenant mais peux tu m'expliquer comment tu as fais s'il te plait
      0