Not sure if this can be done

Closed
chase - Jul 14, 2010 at 03:12 PM
rizvisa1
Posts
4479
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 replies

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