Bonjour,

Je voudrai que lorsqu'une case est vide, une colonne soit masquée.
J'ai écris ce code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Sub AFFICHER()
'
'
   Range("K5:K40").Select
    If Range("K5").Value = "" Then
     Columns("L:L").Select
   Range("L:L").EntireColumn.Hidden = True
    Else
     Range("L:L").EntireColumn.Hidden = False
    End If
 
End Sub
Il fonctionne si je fais executer macro.
Comment faire pour que celui ci fonctionne dès que l'on saisi une valeur dans la case K5 la colonne L s'affiche?

Merci
Seb