Not sure if this can be done

Closed
chase - Jul 14, 2010 at 03:12 PM
rizvisa1 Posts 4478 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 - Jul 22, 2010 at 12:09 PM
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 July 12, 2010 Status Member Last seen July 14, 2010 15
Jul 14, 2010 at 03:34 PM
Hi there,

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

Thanks
0
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..
0
rizvisa1 Posts 4478 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 766
Jul 14, 2010 at 07:09 PM
0
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.
0
rizvisa1 Posts 4478 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 766
Jul 22, 2010 at 12:09 PM
You are supposed to execute the code
The text "Hi there" will scroll in cell D6
0