Pb macro

Fermé
carotte78 Messages postés 46 Date d'inscription mardi 12 février 2013 Statut Membre Dernière intervention 3 juin 2013 - 4 mars 2013 à 09:41
Mabelle60 Messages postés 469 Date d'inscription mercredi 4 avril 2007 Statut Membre Dernière intervention 21 juin 2017 - 4 mars 2013 à 16:36
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


A voir également:

2 réponses

chossette9 Messages postés 4239 Date d'inscription lundi 20 avril 2009 Statut Contributeur Dernière intervention 12 septembre 2014 1 306
4 mars 2013 à 09:49
Bonjour,

"Cas 3:" représente tout ou une partie de la cellule B9 ?

Cordialement.
0
carotte78 Messages postés 46 Date d'inscription mardi 12 février 2013 Statut Membre Dernière intervention 3 juin 2013
4 mars 2013 à 09:54
je vous donne le fichier :https://www.cjoint.com/?3Cej1Z9ZvX5
0
Mabelle60 Messages postés 469 Date d'inscription mercredi 4 avril 2007 Statut Membre Dernière intervention 21 juin 2017 130
Modifié par Mabelle60 le 4/03/2013 à 16:44
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
0