Texte défilant dans un USF

[Magic_Doctor]

Bonjour,

J'ai cherché et cherché et... je n'ai pas trouvé grand chose à ce sujet. Pourtant...
Peut-on, par un moyen ou par un autre faire en sorte qu'un texte défile dans un USF (si-possible dans un TextBox contenu dans l'USF, mais si ce doit être ailleurs dans l'USF, pourquoi pas) ?
Il semblerait qu'il faille passer par un "WebBrowser". Pas très clair...

Merci pour me donner un verdict à ce sujet.

 

[JCGL]

Re : Texte défilant dans un USF

Bonjour à tous,

Texte défilant dans des TexteBoxes

A+ à tous

 

[laetitia90]

Re : Texte défilant dans un USF

bonjour tous J claude
un essai avec un Webbrower dans un user

en complement V represente la vitesse de deroulement nbsp espace entre caractere

acceptable au niveau resource systeme

attention si tu lance une grosse macro le deroulement va se figer excel beaucoup du mal a faire 2 chose en meme temps

 

[BOISGONTIER]

Re : Texte défilant dans un USF

Bonjour,

http://boisgontierjacques.free.fr/fichiers/Formulaire/FormMessageDefilant.xls

Private Sub UserForm_Initialize()
  Me.Label1.Caption = ". . . Nous sommes le " & Application.Proper(Format(Now(), "dddd dd mmmm yyyy")) & _
    " . . . . . . . . "
End Sub

Private Sub UserForm_Activate()
  n = Len(Me.Label1.Caption) * 5
  For i = 1 To n
    Me.Label1.Caption = Right(Me.Label1.Caption, Len(Me.Label1.Caption) - 1) & Left(Me.Label1.Caption, 1)
    w = 0.2
    temp = Timer
    Do While Timer < temp + w
     DoEvents
    Loop
  Next i
  Unload Me
End Sub

JB

 

[Magic_Doctor]

Re : Texte défilant dans un USF

Bonsoir JCGL, laetitia90, BOISGONTIER,

Désolé, mais je n'ai pu répondre avant. Je n'ai pu voir, pour l'instant, que la solution de JCGL. Je l'ai adaptée pour un USF et ça marche très bien (voir PJ). Un grand merci !
Je regarderai demain celle de laetitia90 et de BOISGONTIER.

Très bonne nuit à tous.

 

[excfl]

Re : Texte défilant dans un USF

Bonjour le forum,

Lien supprimé

Version modifiée en pièce jointe et texte défilant dans un USF.

excfl

 

[Si...]

Re : Texte défilant dans un USF

salut

pour le fun, autre idée (sans TextBox supplémentaire et avec possibilité d’arrêter, de reprendre le défilement).

 

[excfl]

Re : Texte défilant dans un USF

Re,

Trois textes différents en scroll.

excfl

 

[Magic_Doctor]

Re : Texte défilant dans un USF

Bonsoir,

Je reviens sur le sujet.
Amusé par les possibilités de textes défilants, pour le fun, j'ai tenté d'en mettre un dans la barre de titre d'un USF.
Ça marche mais ça achoppe. Je m'eplique :
Sur ma feuille il y a un tableau avec 2 colonnes.
Quand on double-clique sur une des cellules de la 1ère colonne du tableau, un USF apparaît avec un texte explicatif qui défile dans sa barre de titre. Une fois que l'USF est fermé, si l'on désire le rappeler il faut alors double-cliquer 2 fois de suite. J'ai cherché la raison et ne l'ai évidemment pas trouvée.

Merci de m'aider à résoudre ce problème.

 

[Magic_Doctor]

Re : Texte défilant dans un USF

Je pense avoir trouvé, il fallait que l'USF soit en modal.