textBox Multiligne

C

Coppens

Guest
J'aimerais recopier chaque ligne d'un textbox, se trouvant sur un userform, dans des cellules différentes d'une feuille.
merci de m'aider
 
@

@+Thierry

Guest
Salut Coppens,

Tiens ton Post est resté sans réponse après + de 24 heures ... A mon avis il y manque deux petits trucs...

1) Ni un Bonjour, Ni un Au revoir (tu sais, dans les forums ont est pas des machines, mais des gens...
2) Explication vraiment trop succinte... Des Cellules Différentes ??? n'importe où sur la feuille ? (lol)

Bon enfin pour t'aider, puisque tu duis quand même "merci de m'aider"...

Admettons que tu veuilles reporter ce que tu viens de saisir dans une TextBox d'un UserForm... en colonne ligne par ligne, à la suite des entrées successives...

A mettre dans le private module de ton UserForm où tu as créé :
Une TextBox nommée TextBox1
Un CommandButton nommée CommandButton1
Il te faut aussi une feuille nommée "Feuil1"...

Private Sub CommandButton1_Click()
Ligne = Sheets("Feuil1").Range("A65536").End(xlUp).Row + 1
Sheets("Feuil1").Range("A" & Ligne).Value = TextBox1
TextBox1 = ""
TextBox1.SetFocus
End Sub

Ce n'est qu'un départ...Il n'y a pas de controle de vérification etc... C'est juste pour te faire comprendre...

Bon travail et bon Week End
@+Thierry
 

Discussions similaires

Réponses
15
Affichages
425

Membres actuellement en ligne

Statistiques des forums

Discussions
311 725
Messages
2 081 941
Membres
101 846
dernier inscrit
Silhabib