Récup d'un textbox multiligne

[fred]

bonjour,

comment faire pour qu'en cliquant sur le bouton 'envoyer' d'un userform où se trouve un textbox multiligne on puisse récupérer par exemple à partir de C15 dans la feuille Feuil1 les différente lignes qu'on rentrera dans le textbox dans plusieurs lignes sur la feuil1.

parceque si on écrit 3 lignes dans la textbox on retrouve ces 3 lignes concaténer dans la cellule C15 avec un petit carré qui symbolise le retour à ligne dans le textbox.

exemple de ce que l'on pourrait rentrer dans le textbox:

l'adresse est 15 rue ....
le nom de famille est ...
son métier est ...

il faudrait que C15 récupère 'l'adresse est 15 rue ...' ;
que C16 récupère 'le nom de famille est ...' et que C17 récupère 'son métier est ...'



voilà merci par avance.
bonne fin de week end

 

[Startus]

Bonsoir à tous,

Ton problème me semble difficile Fred mais pas impossible...

Pourquoi, tu ne crée pas 3 Textbox dans ton Userform afin d'envoyer chaqune d'entre elles à une cellule définie...

Simplement une idée...

 

[Hervé]

bonsoir

une syntaxe possible à adapté :

tablo = Split(TextBox1, Chr(13))

For i = 0 To UBound(tablo)
        Cells(i + 1, 1) = tablo(i)
Next i

salut