日常工作中我们经常使用特快专递，逐张填写比较麻烦，如果经常给固定的人和客户发特快，我们能不能用Excel自己做个打印工具呢？

答案是肯定的，当然用其他软件(例如word)或编程也可以。但是Excel实现起来比较简单，我们先预览一下完成后的效果：

下面我简单介绍一下制作的思路：

1、在VBA下制作一个窗体，界面如上图，背景的EMS详单的图，你可以扫描一张，或者自己用Excel画一个（上图就是我自己用Excel画的，因为

扫描的文字有些模糊），然后根据需要输入的地方添加相应的控件，例如：文本框、标签、按钮等等。

2、界面制作好后就是在Excel里面建立4个工作表（sheet），分别用于存储寄件人信息、收件人信息、窗体信息获取的表和一个用于调整格式的

打印模板，其中窗体信息获取这张表可以简化掉，用VBA代码实现，但对于VBA不是很熟的我，还是用它过度一下比较简单。

3、接下来就是窗体及控件代码的编写，其中寄件人和收件人这两个用复合列表框控件，事件用Changes或Afterupdate都可以，我用的Afterupdate,

主要是要实现当输入或选择完寄件人之后，代码要完成在寄件人信息的表中搜索对应的电话、单位名称、地址等信息，传递给打印模板和窗体本身

的控件，收件人的与寄件人的逻辑相同，只是搜索的表不同，收件人对应的控件应该搜索收件人信息的表。

4、最后就是按钮的代码编写，帮助等简单的细节了。

预览一下帮助的界面：

由于时间关系，这里仅给大家介绍了简单的思路，并没有附源代码，如果有兴趣可以下载文件自己看一下。:)

下载地址：http://www.cccto.com/a/ruanjian/ruanjiandaohang/Officesoft/2010/1012/1833.html