T
titto
Guest
Bonjour tout le monde et joyeux noel à vous tous!
J'ai un petit souci si quelqu'un peut m'aider, en fait j'ai sur une feuille excel une liste déroulante par mois , ou j'ai mis le code ci dessous:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$14" Then Exit Sub
Dim mois As Variant
Range("B:IV").EntireColumn.Hidden = True
mois = Application.Match(Target, Range("A15:A26"), 0)
If IsNumeric(mois) Then
Range("B:F").EntireColumn.Offset(0, 5 * mois - 5).Hidden = False
End If
End Sub
je voudrai avoir en haut une partie statique (que j'ai colorié en vert)qui ne changera pas quand je passerai d'un mois à un autre.
Merci
J'ai un petit souci si quelqu'un peut m'aider, en fait j'ai sur une feuille excel une liste déroulante par mois , ou j'ai mis le code ci dessous:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$14" Then Exit Sub
Dim mois As Variant
Range("B:IV").EntireColumn.Hidden = True
mois = Application.Match(Target, Range("A15:A26"), 0)
If IsNumeric(mois) Then
Range("B:F").EntireColumn.Offset(0, 5 * mois - 5).Hidden = False
End If
End Sub
je voudrai avoir en haut une partie statique (que j'ai colorié en vert)qui ne changera pas quand je passerai d'un mois à un autre.
Merci