Word2007怎么做七彩霓虹字
时间:2023-11-11 08:56:31
可以通过字体对话框来设置动态效果。
操作步骤:
1、选中要调为动态效果的文字,单击右键,在弹出的快捷菜单中选择字体命令;
2、弹出字体对话框,在文字效果选项卡中选择七彩霓虹即可,如图所示。
效果如图所示:
如果不能在word中直接找到,我们还可以用vba代码来实现:
用Word2007打开文档,选中需要设置文字效果的文字;
按组合键Alt+F11,调出“Microsoft Visual Basic”对话框
在“Microsoft Visual Basic”对话框左下角的“立即窗口”中输入下面的代码后回车:
Selection.Font.Animation=wdAnimationMarchingRedAnts
如图:
上面是红色蚂蚁线的效果(赤水情深),Word2003中所有文字效果对应代码如下:
赤水情深Selection.Font.Animation=wdAnimationMarchingRedAnts
乌龙绞柱Selection.Font.Animation=wdAnimationMarchingBlackAnts
七彩霓虹Selection.Font.Animation= wdAnimationLasVegasLights
闪烁背景Selection.Font.Animation=wdAnimationBlinkingBackground
亦幻亦真Selection.Font.Animation= wdAnimationShimmer
礼花绽放Selection.Font.Animation=wdAnimationSparkleText
应用时,只需要将第3步代码替换即可。
能设置文字效果,自然也能取消,方法同上,只需将第3步的代码换成下面这行就可以了。
Selection.Font.Animation=wdAnimationNone
也可以用下面方法取消文字效果:
打开word,Alt+F11,在弹出窗口“Microsoft Visual Basic”中,插入模块,粘贴以下代码
Sub 取消文字效果()
Selection.Font.Animation = wdAnimationNone
End Sub
END
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
联想G410笔记本不能使用WiFi和蓝牙的解决方法
![](https://img.aspxhome.com/file/2023/3/a297257_0s.jpg)
远程桌面端口怎么修改?远程桌面端口修改教程
![](https://img.aspxhome.com/file/2023/6/a324280_0s.jpg)
wps怎么关闭表格? wps表格关闭的三种方法
![](https://img.aspxhome.com/file/2023/3/a141583_0s.png)
如何使用word检测并修复功能可以自动修补Word的错误
![](https://img.aspxhome.com/file/2023/8/33068_0s.jpg)
怎么快速恢复Win10开始菜单?一款软件快速让您的Win10恢复开始菜单风格
![](https://img.aspxhome.com/file/2023/9/52169_0s.png)
手机百度中怎么更换皮肤?手机百度更换皮肤的方法
![](https://img.aspxhome.com/file/2023/8/a333966_0s.jpg)
PicsArt制作爱心九宫格图片的具体操作方法
![](https://img.aspxhome.com/file/2023/8/a338617_0s.jpg)
夸克网盘怎么删除干净?夸克网盘卸载教程
![](https://img.aspxhome.com/file/2023/6/a323451_0s.png)
win10显示器颜色不正常怎么办_电脑显示器颜色不正常解决办法
![](https://img.aspxhome.com/file/2023/2/a285823_0s.jpg)
苹果讲解Mac Pro新款AMD Radeon Pro W6000显卡兼容性细节
![](https://img.aspxhome.com/file/2023/4/a205104_0s.jpeg)
轻松解决蓝屏"STOP:c000021a Unknown Hard Error"的方法
![](https://img.aspxhome.com/file/2023/2/a291749_0s.jpg)
Win10怎么启用网络发现?
![](https://img.aspxhome.com/file/2023/26/a225122_0s.jpg)
Win10系统开启SATA硬盘AHCI模式的解决方法
![](https://img.aspxhome.com/file/2023/2/a289280_0s.jpg)
Win10突然没有wlan选项怎么恢复?
![](https://img.aspxhome.com/file/2023/26/a223756_0s.jpg)
Snipaste固定尺寸进行截图设置教程
![](https://img.aspxhome.com/file/2023/30/a265401_0s.jpg)
Mac VLC播放器怎么禁止使用硬件解码?
![](https://img.aspxhome.com/file/2023/0/a208180_0s.png)
word目录怎么自动生成 word的目录自动生成办法详解
![](https://img.aspxhome.com/file/2023/7/33777_0s.png)
金山数据恢复大师怎么恢复丢失数据 金山数据恢复大师恢复丢失数据的方法
![](https://img.aspxhome.com/file/2023/8/a338310_0s.jpg)
Win10家庭版如何升级到Win10专业版?Win10家庭版升级教程
![](https://img.aspxhome.com/file/2023/26/a222715_0s.png)
Excel 2010中设置分数类型数字格式
![](https://img.aspxhome.com/file/2023/3/37553_0s.jpg)