Not sure if this can be done

Closed
chase - 14 Jul 2010 à 15:12
rizvisa1 Posts 4478 Registration date Thursday 28 January 2010 Status Contributor Last seen 5 May 2022 - 22 Jul 2010 à 12:09
Hello,

I want to display a message in a cell, I want the message displayed as a slide, with the words coming in from the right of the cell to the left. Just like those digital signs you see with the words running across the screen. Hope you understand what I mean. Thanks

2 responses

rahulfinch Posts 59 Registration date Monday 12 July 2010 Status Member Last seen 14 July 2010 15
14 Jul 2010 à 15:34
Hi there,

You mean like a screen save?for which model of handset you want to make it?

Thanks
Hello,

Not sure what you mean. In one of the cells in excel i would like whatever message i want to display, show up as a running slide, with the words coming in from the right of the cell. The message will be moving from right to left..
rizvisa1 Posts 4478 Registration date Thursday 28 January 2010 Status Contributor Last seen 5 May 2022 766
14 Jul 2010 à 19:09
Sub Tester1()
Dim sp As String
Dim sTxt As String
Dim x As Integer, y As Integer
Dim Start, delay

sTxt = "Hi there!!"

For y = 1 To 15 '15 Loops through the scrolling
For x = 1 To 30 'Index number of times
Start = Timer 'Set start to internal timer
delay = Start + 0.15 'Set delay for .15 secs

Do While Timer < delay 'Do the display routine
[D6] = Space(x) & sTxt 'Show 1 str @ a time
DoEvents 'do there things
Loop 'Loop until delay is up
DoEvents
Start = Timer 'and reset the timer
delay = Start + 0.15 'and the delay
Next x 'Show the next str
Next y 'Do this again - 15

[D6] = "" 'Reset

End Sub

This is the code i got from the link you provided, I copied and pasted, but nothing happened.
rizvisa1 Posts 4478 Registration date Thursday 28 January 2010 Status Contributor Last seen 5 May 2022 766
22 Jul 2010 à 12:09
You are supposed to execute the code
The text "Hi there" will scroll in cell D6