Discussion :

[eliot.raymond]

Bonsoir a toutes et tous, Forum bonsoir

Voila j'ai une liste de titre de vidéos qui s'affiche dans ma ListBox1 et je la recopie
également dans ma Feuil1

cette liste augmente régulièrement.

je souhaiterai svp en VBA souligné (tout le titre) automatiquement a chaque ligne.

merci pour votre aide et pour votre temps, une bonne soirée a tous.

Cordialement Ray

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
With ListBox1
        Sheets("Feuil1").Range(Cells(1, 1), Cells(.ListCount, 1)) = .List
End With

[gFZT82]

Bonsoir,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
    With Sheets("Feuil1").Range(Cells(1, 5), Cells(ListBox1.ListCount, 5))
        .Value = ListBox1.List
        .Font.Underline = xlUnderlineStyleSingle
    End With

Cordialement.

[eliot.raymond]

Salut gFZT82

Merci pour ta réponse c'est sympa

Bon ça fonctionne très bien et j'ai vu avec l'aide Excel pour double souligné nickel.

j'ai essayer pour mettre le soulignement du autre couleur

par colorindex=3 ou forecolor=3 mais ça marche pas

mais est-il possible de mettre une couleur ???

Merci pour la modification du code

Bonne soirée a toi et encore merci

Cordialement Ray

[clementmarcotte]

Bonjour,

Salut gFZT82


j'ai essayer pour mettre le soulignement du autre couleur

par colorindex=3 ou forecolor=3 mais ça marche pas

mais est'il possible de mettre une couleur ???

Je ne pense pas. Le (double) soulignement est intégré au format de la police.

Je ne vois que trois solutions de broche à foin (bancales en français de France) et absolument pas testées. J'insiste, pas testées:


- Mettre le texte souligné en exposant
- Mettre une bordure "ligne du bas" et colorer la bordure
- Dessiner une barre dans la cellule immédiatement dessous la cellule active et mettre la hauteur de la ligne qui contient les dessin la plus faible possible.

[eliot.raymond]

Bonjour clementmarcotte

Meilleurs voeux a tous bonne année 2014

Merci pour ta réponse, mais je n'ai rien compris a ta réponse, désolé.

si tu peux svp me préciser, de ma part surement effet nitro bibine va savoir LOL

Merci et bonne après midi

Cdlt Ray