défiler un petit texte dans une cellule

Re : défiler un petit texte dans une cellule

Bonjour,

Sans VBA, ce n'est pas possible (à ma connaissance).

Sinon, tu peux rechercher sur le Forum, le sujet a déjà été traité.

Voir ce fil par exemple (il y en a d'autres) :

https://www.excel-downloads.com/threads/texte-deroulant-sur-excel.54790/

@+

Re : défiler un petit texte dans une cellule

Bonjour lamho27,

Sans Vba, je ne vois pas cela possible....

Avec Vba, un truc de ce style :

Sub défil()
ActiveSheet.Unprotect
Dim C As Range
Dim i%
Set C = Range("c1")
For i = 1 To x ' ici un multiple de ton texte 100 par exemple, si le texte fait 25 caractères, soit 4 fois le défilement
C = Right(C, Len(C.Value) - 1) + Left(C, 1)
Sleep 100
Next i
ActiveSheet.Protect
End Sub

Edit : Salut Tibo, long à rédiger moi

Re : défiler un petit texte dans une cellule

Bonjour,


http://boisgontierjacques.free.fr/fichiers/jb-ontime.zip

JB

Re : défiler un petit texte dans une cellule

BOISGONTIER , je fais comme toi ; ça marche bien , mais quand defiler je tape sur 1 cellule ; a erreur " Microsoft visual basic 400"