VBA + calendrier

Signaler
-
Messages postés
17231
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
-
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

Messages postés
17231
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
4 247
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)
Messages postés
17231
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
4 247
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 http://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 http://www.commentcamarche.net/faq/29493-utiliser-cjoint
Il existe aussi :
1) https://mon-partage.fr/
Comme demandé : https://www.cjoint.com/c/JIerZFTWcSW
Messages postés
12279
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
694
tu mentionnes VBA, s'agit-il bien de Microsoft Excel?
Une erreur de ma part pour le format, nouveau lien avec le bon format : https://www.cjoint.com/c/JIetjxn7AtW
Messages postés
12279
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
694
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.
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
Messages postés
12279
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
694 > 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?
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
Messages postés
12279
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
694
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?
>
Messages postés
12279
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020

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.
Messages postés
17231
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
4 247
Re,

effectivement un fichier Open Office ou libre Office n'a rien à voir avec Excel,
regarde ton fichier en version Excel et Libre Office

https://www.cjoint.com/c/JIff7Kmiurc

https://www.cjoint.com/c/JIff7bsv2Ec
https://www.cjoint.com/c/JIetjxn7AtW
Messages postés
17231
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
4 247
Re,

je ne comprends pas, tu remets ton ancien fichier, mais as tu testé mes deux liens
le lien que je vient de donner amène au fichier en format xlsx ce qui est le bon format pour moi ??
Messages postés
17231
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 septembre 2020
4 247
Et bien mon premier lien est bien le fichier Excel, si tu l'avais ouvert
https://www.cjoint.com/c/JIff7Kmiurc

A+
Mike-31

Je suis responsable de ce que je dis, pas de ce que tu comprends...
Ok je vois maintenant mais peux tu m'expliquer comment tu as fais s'il te plait