Discussion :

[Craquotte]

Bonjour à tous,

Je n'ai jamais utilisé les macros de ma vie mais je crois que la je ne vais pas pouvoir faire sans !!!

Je vous expose mon problème :

Sur mon fichier joint (0001-ZZ_s00_v01), en fonction du choix en C3, certaines lignes doivent s'afficher et d'autres se cacher.

Autrement dit par exemple :

Si je choisis : "Caisson"
Alors il cache les lignes 27 à 72 et me montre toutes les autres

Par contre, si je choisis : "Caisson + Façades 1"
Alors il cache les lignes 50 à 72 et me montre toutes les autres

et ainsi de suite...

Un très très grand merci pour votre aide !!!

(Pour voir la liste déroulante en C3, il faut également ouvrir le fichier 0000_Style01_infos)

[Daranc]

pour masquer des lignes?
ne peut tu pas passer par un plan
si tu ne veut que consulter une liste faire sur ta feuille tu créé un plan ( dans l'onglet données bouton grouper
regardes si cela ne te conviendrais pas.

[Craquotte]

Bonsoir Daranc !

Je ne sais absolument pas de quoi tu parle !!!
Qu'est ce qu'un plan ?

Je ne veux pas uniquement consulter le tableau, je veux également le remplir !

Merci pour ton aide...

[keygen08]

Bonjour

J'ai commencé, yapluska continué, ce code est a collé dans vbaproject dans la feuille meuble. afficher vb par appui sur Alt F11

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Sub Worksheet_Change(ByVal Target As Range)
 Dim KeyCells As Range
 Set KeyCells = Sheets("Meuble").Range("c3")
 If Not Application.Intersect(KeyCells, Range(Target.Address)) _
 Is Nothing Then
 
    If Range("c3") = "---" Then
    Range("a1:a200").EntireRow.Hidden = False
    End If
 
    If Range("c3") = "Caisson" Then
    Range("a1:a200").EntireRow.Hidden = False
    Range("a27:a72").EntireRow.Hidden = True
    End If
 
    If Range("c3") = "Caisson + Façade 1" Then
    Range("a1:a200").EntireRow.Hidden = False
    Range("a50:a72").EntireRow.Hidden = True
    End If
 
 
 
 
End If
End Sub

[Craquotte]

Merci infiniment pour votre aide !!!
C'est génial quand on arrive à concrétiser un projet...