Masquage lignes simples/fusionnées fonction valeur 1ere col

Bonjour à tous,

Tout d'abord désolé d'avance si ce sujet existe dans un précédent post, mais je ne trouve pas la solution à mon problème.

Dans une feuille excel, je souhaite masquer en cliquant sur un bouton toutes les lignes dont la date contenue dans la colonne A est antérieure à la date du jour. Je ne suis pas très doué en programmation/macro et j'ai chipé du code à droite à gauche. Je pensais avoir trouvé quelque chose qui fonctionne, mais certaines cellules de la colonne A sont fusionnées, c'est précisément ce qui pose problème. Il est important pour moi que certaines cellules soient fusionnées, et elles peuvent être de différentes "hauteurs". En espérant avoir été le plus clair possible.

Voir le fichier ci-joint.

Merci beaucoup de votre aide.

Bonsoir,

For i = 3 To dls
       ' On récupère la hauteur de la fusion dont fait partie la cellule
       ' (hauteur = 1 si la cellule n'appartient pas à une plage fusionnée)
       hauteur = Range("A" & i).MergeArea.Rows.Count
       ' Si la date indiquée est passée
       If Range("A" & i).Value < Date Then
              ' On masque les lignes de la fusion dont elle fait partie
              ' (Ligne unique si la cellule n'appartient pas à une plage fusionnée)
              Range("A" & i).MergeArea.Rows.Hidden = True
       End If
       ' On augmente la valeur de i pour passer à la prochaine ligne à analyser
       i = i + hauteur - 1
Next i

Bonjour,

Génial, exactement ce sont j'ai besoin. Merci beaucoup!

Cordialement.

Rechercher des sujets similaires à "masquage lignes simples fusionnees fonction valeur 1ere col"