Re: Merci @Thierry
Bonsoir Myllie Mylène !! et le Forum
Je pense que tu n'as pas dû me répondre sous l'adresse email que tu utilises ici car je n'ai pas de mail d'aucune Mylène
Dommage, c'est un très joli prénom
Enfin content de t'avoir rendu service, et surtout de lire un message sympa.
Pour traduire en Italien ne compte pas sur moi !! lol
Par contre n'oublie pas de changer pour la taille de ta plage si tu descends à 300 noms DEUX CHOSES IMPORTANTES DANS LE CODE :
UNE :
Dim Ligne As Byte
ça n'ira pas, Byte à une limite a 255.........
Change pour :
Dim Ligne As Integer
(dans les trois macros "ComboBox1_Change" et "ListBox1_Change" et "CommandButton2_Click"
DEUX
ListBox1.RowSource = "Gestock!C5:C10"
Cà n'ira pas faut ajuster à la plage aussi, par exemple :
ListBox1.RowSource = "Gestock!C5:C301"
idem pour toutes les autres lignes du style :
Set Nome = WSbase.Range("B5:B10")
que tu mettras
Set Nome = WSbase.Range("B5:B301")
etc etc etc
Attention tu mets par exemple 301, mais tu mets le même chiffre partout !!
Si tu as un problème reviens nous voir
Bonne Nuit
@+Thierry