pour le surnom c vrai que c pas forcement jolie
pour le reste je vais m'expliquer un peu mieu
jai ca
With Sheets('feuille1')
If ComboBox1 = 'blabla1' Then
.Shapes.Range(Array(1, 2)).Visible = True
.Shapes.Range(Array(3, 4, 5, 6, 7, 8, 9, 10)).Visible = False
pour mes image
et j'aimerais avoir pareil pour mes combobox....en fait c la ligne
.Shapes.Range(Array(3, 4, 5, 6, 7, 8, 9, 10)).Visible
que je souhaiterais transformer pour que cela foncionne sur combobox
voila
merci