Pb macro
carotte78
Messages postés
50
Statut
Membre
-
Mabelle60 Messages postés 167 Date d'inscription Statut Membre Dernière intervention -
Mabelle60 Messages postés 167 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
je viens de mettre une maro qui avant marchait dans mon tableau excel..maintenant elle selectionne bien les lignes que je veux masquer mais ne les efface pas. Le classeur les souligne en bleu. pourtant tout est bon: le nom, les cases ...
Par exemple j'ai une case B9 . lorsque dans cette case je selecione dans mon menu déroulant "cas 3" les lignes 12 a 27 disparaissent. la ca me les surligne/ selctionne en bleu mais me les masuqnet pas.
Private Sub Worksheet_Change(ByVal Target As Range)
Rows("12:27").Select
If Range("B9").Value = "Cas 3:" Then
Selection.EntireRow.Hidden = True
Else
Selection.EntireRow.Hidden = False
End If
End Sub
Merci beaucoup
je viens de mettre une maro qui avant marchait dans mon tableau excel..maintenant elle selectionne bien les lignes que je veux masquer mais ne les efface pas. Le classeur les souligne en bleu. pourtant tout est bon: le nom, les cases ...
Par exemple j'ai une case B9 . lorsque dans cette case je selecione dans mon menu déroulant "cas 3" les lignes 12 a 27 disparaissent. la ca me les surligne/ selctionne en bleu mais me les masuqnet pas.
Private Sub Worksheet_Change(ByVal Target As Range)
Rows("12:27").Select
If Range("B9").Value = "Cas 3:" Then
Selection.EntireRow.Hidden = True
Else
Selection.EntireRow.Hidden = False
End If
End Sub
Merci beaucoup
2 réponses
-
Bonjour,
"Cas 3:" représente tout ou une partie de la cellule B9 ?
Cordialement.-
je vous donne le fichier :https://www.cjoint.com/?3Cej1Z9ZvX5
-
-
Bonjour
Cela vient du fait que dans ta cellule B9, le texte exact est "Cas 3 : 1 seule mesure > à la VLEP
ou
9 CEP sur 3 campagnes avec probabilité de déapssement de la VLEP >5%"
De ce fait, c'est la partie <<Selection.EntireRow.Hidden = False>> de ton code qui prend le pas...
Si en B9 tu rentres texto Cas 3, cela fonctionne (après avoir shooté la liste de validation naturellement)...
Rapidement, je dirais
En A9, met la formule =Gauche(B9;5)
et fait pointer ton code sur la case A9 et non plus en B9
Cordialement
