Masquer une ligne dont une cellule contient un pourcentage
TiteFleur33
-
eriiic Messages postés 25847 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 25847 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
J'ai besoin de votre aide ...
J'ai regardé de nombreux post, mais je n'y trouve malheureusement pas ma réponse.
Je souhaite pouvoir masquer les lignes dont la cellule située dans la colonne K contient "100%".
J'ai saisi la macro suivante, mais elle ne fonctionne pas :
Sub Masquer_lignes()
Dim ligne As Integer
For ligne = 1 To 100
If Cells(ligne, 11) = "100%" Then
Rows(ligne & ":" & ligne).EntireRow.Hidden = True
End If
Next
End Sub
Peut être que je me trompe, mais j'ai l'impression que c'est à cause du format de la cellule ("pourcentage") que cela pose problème car j'ai essayé avec un simple mot comme "Fait" et cela fonctionne très bien (ne me dites pas de changer 100% par Fait, ce n'est pas le but) !
Pouvez-vous m'aider s'il vous plaît, cela me ferait gagner un temps fou !!! :)
Merci d'avance
J'ai besoin de votre aide ...
J'ai regardé de nombreux post, mais je n'y trouve malheureusement pas ma réponse.
Je souhaite pouvoir masquer les lignes dont la cellule située dans la colonne K contient "100%".
J'ai saisi la macro suivante, mais elle ne fonctionne pas :
Sub Masquer_lignes()
Dim ligne As Integer
For ligne = 1 To 100
If Cells(ligne, 11) = "100%" Then
Rows(ligne & ":" & ligne).EntireRow.Hidden = True
End If
Next
End Sub
Peut être que je me trompe, mais j'ai l'impression que c'est à cause du format de la cellule ("pourcentage") que cela pose problème car j'ai essayé avec un simple mot comme "Fait" et cela fonctionne très bien (ne me dites pas de changer 100% par Fait, ce n'est pas le but) !
Pouvez-vous m'aider s'il vous plaît, cela me ferait gagner un temps fou !!! :)
Merci d'avance
A voir également:
- Masquer une ligne dont une cellule contient un pourcentage
- Aller à la ligne dans une cellule excel - Guide
- Partager photos en ligne - Guide
- Masquer une conversation whatsapp - Guide
- Bloquer une cellule excel - Guide
- Mètre en ligne - Guide
4 réponses
Bonjour
je pense que le poucentage doit etre numerique
Sub Masquer_lignes()
For ligne = 5 To 10
Pour = Val(Cells(ligne, 11) * 100)
If Pour = 100 Then
Rows(ligne).EntireRow.Hidden = True
End If
Next
End Sub
A+
Maurice
je pense que le poucentage doit etre numerique
Sub Masquer_lignes()
For ligne = 5 To 10
Pour = Val(Cells(ligne, 11) * 100)
If Pour = 100 Then
Rows(ligne).EntireRow.Hidden = True
End If
Next
End Sub
A+
Maurice
Bonjour,
Essaie avec
Essaie avec
Sub Masquer_lignes()A+
Dim ligne As Integer
For ligne = 1 To 100
If Cells(ligne, 11) = 1 Then
Rows(ligne & ":" & ligne).EntireRow.Hidden = True
End If
Next
End Sub
Bonjour
C'est une valeur numérique que tu recherches.
Et 100% = 1, c'est =1 qu'il faut tester.
Personnellement je verrai mieux une case à cocher. Ce qui permet de ré-afficher ces lignes :
https://www.cjoint.com/?DCmm7B4DLUT
eric
C'est une valeur numérique que tu recherches.
Et 100% = 1, c'est =1 qu'il faut tester.
Personnellement je verrai mieux une case à cocher. Ce qui permet de ré-afficher ces lignes :
Private Sub CheckBox1_Click()
Dim ligne As Long, derlig As Long
For ligne = 2 To Cells(Rows.Count, "K").End(xlUp).Row
If CheckBox1 Then
Rows(ligne & ":" & ligne).EntireRow.Hidden = False
Else
If Cells(ligne, "K") = 1 Then
Rows(ligne & ":" & ligne).EntireRow.Hidden = True
End If
End If
Next ligne
End Sub
https://www.cjoint.com/?DCmm7B4DLUT
eric
