Bonsoir le Forum
Le code ci-dessous qui devrait modifier les valeurs affichées dans la listbox en fonction de la valeur de la variable onglet (en fait j'ai une liste source par feuille) me renvoie sur la ligne rouge une "erreur 70 Acces refusé" que l'aide ne semble pas connaitre.
Qu'est ce qui peut la provoquer ??
Private Sub ComboBox1_Change()
ListStock.Visible = True
onglet = ComboBox1.Text
If onglet = "" Then MsgBox "Choisissez une Valeur": Exit Sub
ListStock.AddItem (Sheets(onglet).Range("AA2:AD100"))
End Sub
Merci de votre aide
Le code ci-dessous qui devrait modifier les valeurs affichées dans la listbox en fonction de la valeur de la variable onglet (en fait j'ai une liste source par feuille) me renvoie sur la ligne rouge une "erreur 70 Acces refusé" que l'aide ne semble pas connaitre.
Qu'est ce qui peut la provoquer ??
Private Sub ComboBox1_Change()
ListStock.Visible = True
onglet = ComboBox1.Text
If onglet = "" Then MsgBox "Choisissez une Valeur": Exit Sub
ListStock.AddItem (Sheets(onglet).Range("AA2:AD100"))
End Sub
Merci de votre aide