如果你不喜欢沿袭现成的图标，且自认为绘图功夫还不错，那么可以选择上图中的“编辑按钮图标”，这时会出现一个“按钮编辑器”，慢慢改去吧，直到自己满意为止。万一不小心改成个“四不像”，不必担心那个难看的图标从此永驻在你的Word XP工具栏中，只消选择图中的“复位按钮图标”便可。

　　

　　此外，若你将工具栏中的大部分图标改头换面了，怕是有时连你本人也忘了它们真正的功能，不必慌张，此时只需要在上图中选中“图标与文字”一并选中，这样图标与文字功能说明一并显示，就再也不会忘了图标真正的功能了。

　　四、打造新的工具栏功能按钮

　　在安装了Foxmail 4.2之后，会发现Word XP工具栏中多了一个按钮，一点击就开始运行Foxmail。这是怎么做出来的呢？下面这个办法将教你将常用的工具添加到工具栏中，实现你的愿望。

　　

　　比如，在工具栏中添加一个记事本的功能按钮，可以编写以下宏代码并执行：

......

Sub ButtonBmp()
Dim hDC As Long, hBitmap As Long
ret = GetForegroundWindow()
hBitmap = LoadImage(0, "c:/windows/bubbles.bmp", IMAGE_BITMAP, 32, 32, LR_LOADFROMFILE) 'bubbles.bmp为显示按钮图标的位图
OpenClipboard ret
EmptyClipboard
SetClipboardData CF_BITMAP, hBitmap '将位图复制到剪贴板
CloseClipboard

Set myBar = CommandBars(1)
Set myControl = myBar.Controls _
.Add(Type:=msoControlButton)
With myControl
.PasteFace '将剪贴板的位图粘贴成为按钮的图标
.OnAction = "NotePad" '启动记事本
End With
myBar.Visible = True
End Sub
Sub NotePad()
Shell "C:/windows/notepad.exe", vbNormalFocus
End Sub

......

　　点击这里下载例子（DOC文件经WinRAR压缩）。