Sujet Précédent Sujet Suivant

[VBA/Excel] Copier les nombres d'une textbox

Fermé
sfritz Messages postés 41 Date d'inscription jeudi 9 octobre 2008 Statut Membre Dernière intervention 1 janvier 2014 - 31 oct. 2008 à 14:17
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 31 oct. 2008 à 14:42
Bonjour,
j'aimerai copier les nombres d'une suite de nombres d'une textbox dans des cases excel.
Je m'explique, dans ma textbox j'ai par exemple:
30 1000 50 70 80 37 25 77 16
Chaque nombre est séparé d' un espace par rapport aux autres.
J'amerai copier chaque nombre dans une case Excel différente les unes à la suite des autres (30 dans F1, 1000 dans F2, 50 dans F3...)

Comment copier ainsi les nombres dans les cases?

Merci
A voir également:

1 réponse

Réponse 1 / 1
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
31 oct. 2008 à 14:42
bonjour

essaies

Private Sub TextBox1_Change()
tablo = Split(TextBox1, " ")

For cptr = 1 To UBound(tablo) + 1
Cells(cptr, 6) = tablo(cptr - 1)
Next
End Sub

dans le module de la feuille à remplir, bien sûr!
0