SOAP BUBBLE
XLDnaute Nouveau
Bonjour tout le monde,
Dans un planning de 15 salariés
chaque salarié tient sur 14 colonnes,
les jours en ligne,
j'aimerais n'afficher uniquement que les 14 colonnes d'un salarié choisi par une combobox.
La procedure masque tout le monde et réaffiche le salarié selectionné :
Private Sub ComboBox1_Change()
'ComboBox1
'extrait de la combobox
'Rem : j'emploie du beau monde ;-)
If ComboBox1.Value = "Clara Morgane" Then
Application.ScreenUpdating = False
Columns("H:EZ").Select
Selection.EntireColumn.Hidden = True
Columns("AL:AY").Hidden = False
Application.ScreenUpdating = True
End If
If ComboBox1.Value = ""Catherine zeita jones" Then
Application.ScreenUpdating = False
Columns("H:EZ").Select
Selection.EntireColumn.Hidden = True
Columns("BA:BN").Hidden = False
Application.ScreenUpdating = True
End If
End sub
Je pense qu'il y a plus "finaud"
J'aimerais que la combobox prenne dans la feuille 1:
Merciiiiiiiii de votre aide !
PS: Feuille 1 colonne D est pour les numeros de téléphone mais c'est confidentiel
Dans un planning de 15 salariés
chaque salarié tient sur 14 colonnes,
les jours en ligne,
j'aimerais n'afficher uniquement que les 14 colonnes d'un salarié choisi par une combobox.
La procedure masque tout le monde et réaffiche le salarié selectionné :
Private Sub ComboBox1_Change()
'ComboBox1
'extrait de la combobox
'Rem : j'emploie du beau monde ;-)
If ComboBox1.Value = "Clara Morgane" Then
Application.ScreenUpdating = False
Columns("H:EZ").Select
Selection.EntireColumn.Hidden = True
Columns("AL:AY").Hidden = False
Application.ScreenUpdating = True
End If
If ComboBox1.Value = ""Catherine zeita jones" Then
Application.ScreenUpdating = False
Columns("H:EZ").Select
Selection.EntireColumn.Hidden = True
Columns("BA:BN").Hidden = False
Application.ScreenUpdating = True
End If
End sub
Je pense qu'il y a plus "finaud"
J'aimerais que la combobox prenne dans la feuille 1:
- le nom des salariés dans les cellules A1 a A15
- la plage à réafficher par les entetes de colonnes
- soit par de B1 a C15 representant les entetes de colonnes a réafficher (debut et fin) sous forme par exemple
en B1 : H en C1 :U
en B2 : X en C2 :AJ etc... - soit par une plage nommée pour chaque salarié.
- soit par une super astuce que je n'ai meme pas immaginé et que vous allez me donner !
Merciiiiiiiii de votre aide !
PS: Feuille 1 colonne D est pour les numeros de téléphone mais c'est confidentiel