html跑马灯_用Excel居然能做“跑马灯”，而且还这么简单！

我的目标：让中国的大学生走出校门的那一刻就已经具备这些office技能，让职场人士能高效使用office为其服务。支持我，也为自己加油！

你没看错，上面这个就是用Excel做出来的，不过要用到窗体和控件。 步骤如下： 打开VBE界面，插入一个窗体，在窗体中插入 WebBrowser 控件，如下：

可能你在工具箱里找不到这个控件，需要先到 附加控件 里把它添加到工具箱里。

双击窗体，写入以下代码：

Private Sub UserForm_Activate()    Dim str As String    str = "帮助说明：

1、本工具只适用于win7以上的系统

2、使用本工具前请确保已经安装OFFICE软件

3、请使用管理员身份运行本工具

4、请及时更新版本

5、如有建议请加本人微信反馈，微信号：527240310

"

WebBrowser1.Navigate "about:blank" WebBrowser1.Document.writeln "

" & str & "

"End Sub

向左滑动可以查看完整代码。

当窗体激活时触发以上事件，

WebBrowser1.Navigate "about:blank"表示先打开一个空白的网页。

WebBrowser1.Document.writeln方法表示向网页中写入内容网页代码。

具体网页代码如下：

                     style=''                       οncοntextmenu='return  false'>                           ……               省略号代表变量str里的内容。 不需要理解太深，只要掌握一些关键的属性，照猫画虎，就可以做出案例中的效果。

html代码中关键标签及其属性的解释

bgcolor：网页的背景颜色，属性值可以修改。

style  中是一些相关的属性，比如边框，溢出，外边框距离。 oncontextmenu ='return  false'，表示网页中禁用右键。 下面这一段是滚动字幕(跑马灯)的关键代码，                            ……           direction 表示滚动方向，可以向上，向下，向左，向右 scrollamount 表示滚动速度，值越大滚动越快。 看着挺复杂，其实只要搞清楚具体的原理以及html代码的结构，遇到不懂的属性百度下就可以做出自己想要的效果。 本节的分享就到这里，祝大家每天都有进步。

公众号后台资源库可获取更多资源：

1

在线课堂在逐渐完善中，欢迎您的光临！

点击下方“”即可进入云课堂学习！