Bonjour

Ce que tu demandes est possible en VBA mais c'est aussi une utopie car si les lignes vides sont cachées comment vas-tu faire pour les remplir ?
Toujours zen

Je les remplis avec la fonction RECHERCHV il y des cases où le résultat peut être 0 où une donnée...

Et je veux savoir peut on faire que quand le résultat est 0 la ligne soit masquée...

Bonsoir
Peut_être en ajoutant une feuille d'affichage qui prendrait ses données dans la feuille actuelle par recherchev() uniquement si la valeur de la cellule est différente de 0 ?

Cfeci fait ce que tu demandes lorsque tu entre 0 dans une cellule la validation par entrée (si entrée renvoies à la ligne en dessous ce qui est généralement le cas en standard)
dans le code de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell.Offset(-1, 0).Value = 0 Then
ActiveCell.Offset(-1, 0).EntireRow.Hidden = True
End If
End Sub

 





… je pense que c'est possible avec un filtre automatique, et, pour que ce soit simple à utiliser, mettre une macro filtrage/défiltrage sur un bouton …





→ est différent de ""
renvoie les valeurs non vides, par exemple  

Remarques ce n'est pas sur que ça marche en dehors de la saisie il faut que je rejette un œil au truc. Par contre: est ce qu'il faut traiter une plage où sont déjà entrés les zéros . Ce qui serait plus facile par macro lancer à l'activation de la page le respect n'est pas un dû il se merite  
Cordialement     G.David

 




Pour faire simple, j'ai fait une colonne de test en colonne H (Field:=8)

H1="test" (la ligne 1 contient les titres de colonnes)
H2=NBVAL(A2:G2)

On tire la formule de H2 vers le bas, autant que nécessaire, pour s'appliquer à toutes les lignes (cela pourrait se faire avec une macro)

Sub filtrer()
Cells.Select
Selection.AutoFilter
Range("A1").Select
Selection.AutoFilter Field:=8, Criteria1:="<>0,0", Operator:=xlAnd
End Sub
Sub afficher()
Cells.Select
Selection.AutoFilter
Range("A1").Select
End Sub


Tu peux mettre un bouton avec le texte FILTRER et lui affecter (clic-droit) la macro filtrer(), puis un autre avec le texte AFFICHER et la macro afficher().


Tu peux ajuster le n° de ta colonne de test dans <Field:=8>, en remplaçant 8 par le rang de ta colonne …




 

Rebonjour Arrial, merci pour la reponse

J'ai pu mettre en place la macro et cela marche;

mais j'ai pas compris le truc de colonne de test en colonne H (field:=8)
ok pour :H1=test
ainsi que : H2=NBVAL(A2:G2)

si tu peux m'eclairer sur le 1er point ( H( field:=8) ??????????????????

Merci

"mais j'ai pas compris le truc de colonne de test en colonne H (field:=8)
ok pour :H1=test
ainsi que : H2=NBVAL(A2:G2) "


► je réserve la ligne 1 aux titres de colonne. Je choisis de fabriquer une colonne de critère de filtrage en colonne H, et je rentre en titre de colonne 'test' : j'aurais pu mettre n'importe quoi ('toto') ; c'est juste pour respecter l'existence d'un titre de colonne

► nbval(a2:g2) va totaliser le nombre de cellules contenant quelque chose dans la ligne 2 (de la colonne A à la colonne précédent H)

► il ne reste plus qu'à filtrer sur toutes les lignes ne contenant pas la réponse '0', signifiant que la ligne est vide …



Il y a sûrement des méthodes plus élégantes avec 'WorkSheet' par exemple, mais je ne me suis pas appesanti sur le problème.



@+