Présentation d'une feuil

Michel68000 · 6 Novembre 2007

Bonjour,

Par soucis pratique, je voudrais cacher les ligne d'une feuille qui ne sont pas remplies.
En A1:A60 j'ai une base de noms avec les renseignements dans les colones adjacentes, supposons que la liste ne soit remplie que jusqu'a A20 je voudrais qu'il ne s'affiche que les 21 premières lignes, je garde la 21ème pour l'ajout d'un nom et le reste cad que les ligne 22 a 60 seraient cachées.
Je voudrais arriver à ça parce que en dessous de ces ligne j'ai des filtres utilisateurs.
J'espère avoir bien expliqué mon soucis, merci pour vos suggestions.

skoobi · 6 Novembre 2007

Re : Présentation d'une feuil

Bonjour,

test ceci:

Code:

Sub cache()
Dim cellule As Range
première = 0
For Each cellule In Range("a1:a60")
   If IsEmpty(cellule) Then
      première = première + 1
      If première > 1 Then
         cellule.EntireRow.Hidden = True
      End If
   End If
Next
End Sub

Michel68000 · 6 Novembre 2007

Re : Présentation d'une feuil

Merci, j'ai pu adapter ton code a ma feuille, il y avait un problème de protection à gerer mais je m'en suis sorti.

Présentation d'une feuil

Michel68000

Guest

skoobi

XLDnaute Barbatruc

Michel68000

Guest

Discussions similaires

Présentation d'une feuil

Michel68000

Guest

skoobi

XLDnaute Barbatruc

Michel68000

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency