XL 2016 Insérer une ligne dans textbox d'un formulaire sans effacer le contenu existant

Pexcel

XLDnaute Junior
Bonjour,
tout est dans le sujet donc ... j'ai une textbox dans un formulaire, et je voudrai pouvoir insérer sur la première ligne du haut une phrase en faisant descendre le contenu existant dans l’effacer.

J'ai fait plusieurs recherche sans sucés ...

Merci d'avance pour l'aide.
 

Pexcel

XLDnaute Junior
Bonjour a tous
exemple
VB:
Private Sub CommandButton1_Click()
    Dim phrase
    phrase = "ce que tu veux patin couffin etc.. et tout le reste et meme plus "
    With TextBox1
        .MultiLine = True    ' au cas ou ca ne serait pas fait
        .WordWrap = False    ' avec false si la phrase est trop longue il y en aura une partie qui sera non visible  , avec true le textbox subit le wordwrap et adapte le nombre de ligne
        .Value = phrase & vbCrLf & .Value
    End With
End Sub
C'est au top ça fonctionne un trés grand Merci @ tous !!! Parce que Toulon !!!
 

patricktoulon

XLDnaute Barbatruc
re
si je me fis a ce que tu nous donne ca donne ca tout simplement
VB:
Private Sub ComboBox1_Change()
With TextBox1
.Value = ComboBox1.Value & vbCrLf & .Value
End With
End Sub

demo3.gif
 

Discussions similaires

Statistiques des forums

Discussions
312 344
Messages
2 087 444
Membres
103 546
dernier inscrit
mohamed tano