用万能的VBA可以实现。举例说明。
第一步：建立一张客户数据表，如图：
第二步：创建一张送货单模板。如图：
第三步：编制一个宏程序。代码如下：
Sub 生成快递单()
Dim MYS As String
Dim I As Integer
Dim MCN, MADD As String '存放客户名及客户地址
MYS = "客户表"
Sheets(MYS).Select
I = 2
Do While Cells(I, 1) <> ""
MCN = Cells(I, 1)
MADD = Cells(I, 2)
? ? Sheets("送货单模板").Select
? ? Columns("A:D").Select
? ? Selection.Copy
? ? Sheets.Add After:=Sheets(Sheets.Count)
? ? ActiveSheet.Paste
? ? ActiveSheet.Name = MCN
? ? Cells(1, 2) = MCN
? ? Cells(3, 3) = MADD
? ? Cells(8, 4) = Date
Sheets(MYS).Select
I = I + 1
Loop
End Sub
运行该程序后，结果如图：
辉县红色革命基地明信片怎么做简单的
使用邮件合并功能。
创建一个excel文件，将地址信息编辑好，并保存。
回到word，点击邮件---开始邮件合并--选择信封。
点击选择收件人----使用现有列表，浏览找到刚保存有地址信息的excel文件。
点击编辑收件人列表，勾选需要的和去掉不需要的。
将光标定位到需要放置地址的位置，点击插入合并域，选择地址。
点击预览效果可预览。
点击完成并合并下拉可选择打印所有。
1、首先，以152mm×104mm尺寸的明信片为例。打开word，选择页面布局-纸张大小-设置为长152mm，宽104mm.
2、插入0.6cm的小正方框为邮编的格子，外边框为红色或黑色。选择插入-形状-矩形。轮廓颜色为红色。复制共为六个方框。
3、用同样的方法在右上角插入一个长方形的方框来表示贴邮票的地方。高为1.7cm，宽为1.5cm.。
4、插入分割线，插入-形状-线条。画出合适的长度，选择合适的颜色。左边用于写留言，邮编用来写地址，插入边框，用来装饰。
5、插入-/在线，在线有很多边框可以用来装饰。
6、现在开始制作明信片的正面。选择插入-空白页。
7、将喜欢的照片插入进去，拖动，使的大小和明信片尺寸相同。这样，明信片的正反面就制作好了，只需要拿到有打印机的地方就可以打印了。