Masquer une ligne quand case dans colonne vide?

Valhau Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
Theo.R Messages postés 575 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
J'ai un tableau de 530 Lignes et 4 colonnes représentent 1 mois.
Je veux que les lignes s'effacent quand les cases sont vides.
Est ce possible?

D'avance merci
A voir également:

2 réponses

Réponse 1 / 2
Theo.R Messages postés 575 Date d'inscription   Statut Membre Dernière intervention   31
 
Bonjour,

Si par "effacer" vous entendez "supprimer", alors il faut programmer une macro qui supprime les lignes vides (code très simple).

Donnez-nous plus de détails sur vos colonnes en question et nous vous écrirons ce code.

Si on part sur les colonnes A:D, alors ça donnerait : 
For i = 530 to 1 step -1

If WorksheetFunction.CountIf(Range("A" & i & ":D" & i), "=") > 0 Then
    Rows(i & ":" & i).Select
    Selection.Delete Shift:=xlUp

End If

Next i
0
Réponse 2 / 2
Valhau Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Merci pour votre retour,
Non je ne veux pas supprimer la ligne, ça ressemble plutôt à filtrer.
Si dans mes 4 colonnes du mois je trouve rien ou vide dans la case, dans ce cas je filtre pour ne voir apparaître que les lignes où il y a quelque chose. Ce qui veut dire faire un filtre pour 4 colonne en même temps.
Merci
0
Theo.R Messages postés 575 Date d'inscription   Statut Membre Dernière intervention   31
 
Il suffit de masquer la ligne au lieu de la supprimer, le code devient : 
Range(1:530).select   
Selection.EntireRow.Hidden = False

For i = 530 to 1 step -1

If WorksheetFunction.CountIf(Range("A" & i & ":D" & i), "=") > 0 Then
    Rows(i & ":" & i).Select
    Selection.EntireRow.Hidden = True

End If

Next i
0

Discussions similaires

le frigo ne marche pas....
Nemo6456 -
Templier Nocturne -

1 réponse
Internat nourriture
shaun37 -
griggo -

4 réponses