Envoie de données avec utilisation combox

Fermé
coudu - 22 déc. 2009 à 15:06
Farfadet88 Messages postés 6285 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 29 avril 2020 - 22 déc. 2009 à 16:28
Bonjour,
J’ai un userform, composé d’un combox, et de textboxs.
Dans le combox j’ai le choix entre trois sports (Hand, foot et Basket). Dans les textbox je rentre des données. J’aimerai que ces données soient envoyées vers des feuilles Excels nommées « hand », « foot » et « basket » suivant le sport séléctionner dans le combox.

Mais j’y arrive pas…

3 réponses

Farfadet88 Messages postés 6285 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 29 avril 2020 1 394
22 déc. 2009 à 15:11
If combobox1.value="Foot" Then Sheets("foot").range("A1").value= textbox1.value
0
thank,
j'ai une dernière question:
j'aimerais que ce soit enregistré dans la première ligne vide,existe t'il un code pour cela?
Merci bcp
0
Farfadet88 Messages postés 6285 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 29 avril 2020 1 394
22 déc. 2009 à 16:28
If combobox1.value="Foot" Then Sheets("foot").Range("a65536").End(xlUp).Offset(1, 0) = textbox1.value

Et voilà
0