WebBrowser

Résolu/Fermé

adohane - Modifié par Chris 94 le 8/11/2013 à 16:26
adohane - 14 nov. 2013 à 12:05

Bonjour,
j'ai un WebBrowser dans un userform qui fait defiler dutexte de droite à gauche
toute fois je veux inverser le défilement de gauche à droite le code est le suivant:

Private Sub UserForm_Initialize()
ParametresHtml "ãÌãæÚÉ ãÏÇÑÓ áÑÌÇã äíÇÈÉ ÇáÍæÒ", "#000099"
End Sub

'scrollAmount définit la vitesse de défilement.
Private Sub ParametresHtml(LeTexte As String, LaCouleur As String)
Me.WebBrowser1.Navigate _
"about:<html><body BGCOLOR ='#CCCCCC' scroll='no'><font color= " _
& LaCouleur & " size='5' face='Arial'>" & _
"<marquee scrollamount=6>" & LeTexte & "</marquee></font></body></html>"
End Sub

'---
merci à vous

4 réponses

Réponse 1 / 4

sipherion Messages postés 1798 Date d'inscription lundi 22 octobre 2007 Statut Membre Dernière intervention 19 décembre 2016 285
13 nov. 2013 à 11:05

Bonjour,

Cela ne dépend pas du tout du code VBA, c'est en HTML qu'il faut rechercher.

10 sec de recherche Google me donnent un lien :

http://www2.csvt.qc.ca/patriotes/html/code_spec/xmpl_mrq.htm

L'exemple 6 semble illustrer ce que nous recherchons :

<MARQUEE DIRECTION="right" BGCOLOR="yellow">

Donc pour ton code :

'scrollAmount définit la vitesse de défilement.

Private Sub ParametresHtml(LeTexte As String, LaCouleur As String)

Me.WebBrowser1.Navigate _

"about:<html><body BGCOLOR ='#CCCCCC' scroll='no'><font color= " _

& LaCouleur & " size='5' face='Arial'>" & _

"<marquee DIRECTION="right" scrollamount=6>" & LeTexte & "</marquee></font></body></html>"

End Sub

Réponse 2 / 4

adohane
13 nov. 2013 à 22:59

merci pour ta réponse j'ai ajouté le code pour la direction mais ça ne marche pas il marque "right" en bleu ,....
merci pour tout!

Réponse 3 / 4

sipherion Messages postés 1798 Date d'inscription lundi 22 octobre 2007 Statut Membre Dernière intervention 19 décembre 2016 285
14 nov. 2013 à 09:14

Sans vouloir être méchant, un tout petit effort de réflexion t'aurait permit de trouver la solution...

"<marquee DIRECTION='right' scrollamount=6>" & LeTexte & "</marquee></font></body></html>"

Puisque le code HTML de cette balise est déjà entre double quote, tout paramètre ajouté en son sein doit être entre simple quote.

Réponse 4 / 4

adohane
14 nov. 2013 à 12:05

Merci sipherion ! c'est vraiment stupid de ma part
problème résolue merci encore

Discussions similaires

Opéra webbrowser a pris le pouvoir

Discussions similaires

Newsletters