单元格内容文字滚动特效示例

yinxidu · 发表于 2006-4-4 16:55

好晃眼,看了头晕[em06][em06]

jmtang · 发表于 2006-4-6 07:49

这个跑马灯好,收下学习之.谢谢兰版版!!!!

andysky · 发表于 2006-4-6 10:01

楼主可否解释一下以上问题如何处理？

huangyansz · 发表于 2006-4-6 11:16

太酷了,想不到excel也可以实现这种功能

shuaidong · 发表于 2006-4-6 11:28

用VB实现的吗??

zz5151353 · 发表于 2006-4-6 11:42

版主,以下為繁體版出現亂碼,不知道簡體是甚麼 ?

Sub 偌聽1_等僻()
BBB = 1
Range("C6") = "扂乾笢恅Excel整氈窒ㄐ "
Do
For j = 1 To 800
DoEvents
Next j
Range("C6") = Right(Range("C6"), 1) & Left(Range("C6"), Len(Range("C6")) - 1)
Loop Until BBB = 0
End Sub
Sub 偌聽2_等僻()
BBB = 0
End Sub

yigepure · 发表于 2006-4-6 13:02

非常棒，我上次搞窗体的文本移动时，当时有一个网友也是这样问的。不过当时我的想法不成熟，老兄的这个空格加的好。对我很好启发。我现在用的是两个循环来做，效果还不够理想。谢谢了！！！

dy_ysl · 发表于 2006-4-6 13:02

我用的是2003版的，打开后没见有流动呵。

breezy · 发表于 2006-4-6 13:38

赵老师真棒！：）[em02]

zz5151353 · 发表于 2006-4-6 13:44

請論壇朋友幫忙,貼出版主的代碼 ? , 在 vba 裡是亂碼, 貼出來就不是亂碼 ,先謝了 !!!

		自动登录	找回密码
密码			免费注册

[分享] 单元格内容文字滚动特效示例

最新热点 /1