Masquer ou afficher en fonction d'une conditi

Résolu
sanaesanae Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   -  
sanaesanae Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je suis toute nouvelle dans le monde de la programmation VBA et j'essaie de créer ma 1ère Macro dont voici le principe:
Si la valeur de la cellule c9 est oui donc afficher les lignes 18 au 26
si Non les masquer..

voici ce que j'ai pu trouver en naviguant sur le net et avec l'aide d'un ami:
Sub Test1()

If Range("c9").Value = "non" Then
Rows("18:26").Select
Selection.EntireRow.Hidden = True
End If

If Range("c9").Value = "oui" Then
Rows("18:26").Select
Selection.EntireRow.Hidden = False
End If
End Sub

ceci dit ça ne marche pas pourquoi ...je sais pas
I need heeeeeeeeeeelp :)

Merci d'avance
A voir également:

3 réponses

BzhRico
 
Bonsoir,

Il faut savoir que le code ne séxécute que sur demande, donc une des solutions est de mettre le code suivant dans le VBA de la feuille :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  ActiveSheet.Rows("18:26").Hidden = (ActiveSheet.Range("C9") = "oui")
End Sub

Seul inconvenient, c'est qui s'éxécute à chaque changement de cellule.

NB :
1-Le ".select" puis "Selection." peuvent fusionner, cela permet de ne pas modifier la selection active.
2-Je ne serais dire pourquoi, mais ce même code dans un module VBA du classeur ne modifie pas la propriété Hidden
0
sanaesanae Messages postés 7 Date d'inscription   Statut Membre Dernière intervention  
 
ça marche pas je ne comprend pas pourquoi.?
Peut être une manip que je fais soit erroné..
0
sanaesanae Messages postés 7 Date d'inscription   Statut Membre Dernière intervention  
 
ça marche
J'ai mis un 1 au lieu de oui et 2 au lieu de non et ça marche :)

Merciiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii
0