WebBrowser
Résolu
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
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
-
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 -
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! -
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.
-
Merci sipherion ! c'est vraiment stupid de ma part
problème résolue merci encore
