Masquer colonne à partir d'une date insérer
Fermé
conceptDev
-
3 nov. 2016 à 18:31
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 3 nov. 2016 à 18:53
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 3 nov. 2016 à 18:53
Bonjour,
J'ai un planning de congés dont je dois gérer l'affichage des colonnes en fonction des dates insérées.
pour m'expliquer encore plus j'ai en colonne les dates de l'année en cours , et je dois insérer date début et date fin pour limiter l'affichage donc je dois masquer les date qui sont avant la date de début et les date après la date de fin.
de l'aide SVP
J'ai un planning de congés dont je dois gérer l'affichage des colonnes en fonction des dates insérées.
pour m'expliquer encore plus j'ai en colonne les dates de l'année en cours , et je dois insérer date début et date fin pour limiter l'affichage donc je dois masquer les date qui sont avant la date de début et les date après la date de fin.
de l'aide SVP
A voir également:
- Masquer colonne à partir d'une date insérer
- Déplacer une colonne excel - Guide
- Insérer une vidéo sur powerpoint - Guide
- Creer un groupe whatsapp a partir d'un autre groupe - Guide
- Formule somme excel colonne - Guide
- Trier colonne excel - Guide
1 réponse
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 716
3 nov. 2016 à 18:53
3 nov. 2016 à 18:53
Bonjour,
Tu ne précise pas comment sont saisies tes dates, mais voilà comment masquer tes colonnes.
datedeb et datefin doivent avoir une valeur date.
Les dates du planning sont affichées en ligne 1
Tu ne précise pas comment sont saisies tes dates, mais voilà comment masquer tes colonnes.
Dim cel As Range For Each cel In ActiveSheet.UsedRange.Rows(1).Cells If cel.Value < CDate(datedeb) Or cel.Value > CDate(datefin) Then Columns(cel.Column).Hidden = True Else Columns(cel.Column).Hidden = False End If Next cel
datedeb et datefin doivent avoir une valeur date.
Les dates du planning sont affichées en ligne 1