办公DIY（21）

办公族

2005年5月30日

办公室小陈经常从网页或电子邮件中拷贝文本到Word文档里面，但是直接粘贴不仅会将文本粘贴进来，而且还会将文本的格式带进来，影响了他对文本的进一步编辑。虽然使用“选择性粘贴”中的“无格式文本”选项则可以很好地解决这个问题，不过，这种粘贴方式要执行多步操作才能完成，小陈甚感麻烦，他急于想找到一种一步就可以进行无格式粘贴的办法。

经过研究，小陈使用VBA并结合Word工具栏的自定义功能打造出了一个具备无格式文本粘贴功能的命令按钮。通过它，小陈只需轻点一下鼠标就能完成无格式文本的粘贴功能，十分方便。下面就介绍其详细制作过程：

1.利用VBA创建宏命令

启动Word 2003，按“Alt+F11”组合键，打开Visual Basic 编辑器。在右边空白窗口中键入以下内容：

Sub PasteUnformat()

On Error GoTo opps

Selection.PasteSpecial DataType:=wdPasteText, Placement:=wdInLine

opps:

Beep

End Sub

然后关闭编辑器并返回Word。

2.添加至工具栏并美化

右键点击工具栏，选择“自定义”。在“命令”选项卡中选中“类别”列表中的“宏”，然后在右边的“命令”列表中找到名为PasteUnformat的宏并将其拖到常用工具栏中即可。这样，无格式文本粘贴命令按钮就基本制作完成。不过，由于此命令按钮过宽，而且无法从默认的图标判断其功能，所以，还要对其进行美化。右击“无格式文本粘贴”命令按钮，在弹出的菜单中选择“默认样式”。这样就可将其图标后面的一长串文本给隐藏起来。至于图标，可直接使用右键菜单中的“更改按钮图像”来更改，另外，还可在此基础上对其进行编辑。完成以上操作后关闭“自定义”对话框即可。

提示：利用此方法，我们可根据自己的需要制作出各种执行某些特殊功能的命令按钮来，有兴趣的朋友不妨试试。

（流浪的双鱼）