Masquer colonne
j
Bonjour,
J'ai repris une vba sur ce forum qui fonctionne parfaitement
Private Sub Worksheet_Change(ByVal Target As Range)
'Macro dan pour E-Zekiel - 08/09/09
'http://forum.excel-pratique.com/viewtopic.php?t=13124
If Not Intersect(Target, Range("B15")) Is Nothing Then
If Target = 0 Then
Columns("C").EntireColumn.Hidden = True
Else: Columns("C").EntireColumn.Hidden = False
End If
End If
End Sub
Cela fonctionne si la valeur de B15 est entrée manuellement;
Seulement j'aimerais savoir si c'est possible quand b15 = 0 mais qu'elle est égale à une formule très simple (=BI3)
Merci
Bonjour Jdnath,
Selon ta demande.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B15")) Is Nothing And (Target = 0 Or Target.Formula = "=BI3") Then
Columns("C").EntireColumn.Hidden = True
Else: Columns("C").EntireColumn.Hidden = False
End If
End SubSoit dans la cellule B15 il y a 0 ou il existe la formule =BI3 alors la colonne C sera cachée.