邮件合并(小数点问题)(4)

邮件合并(小数点问题)

窗口，输入如下代码：

Private Sub Timer1_Timer()

Dim Exl As Object

Set Exl = CreateObject("Excel.Application")

Exl.Workbooks.Open (App.Path & "\" & "DZB.xls")

Exl.Visible = True

Unload Me

End Sub

3、点击文件－－生成EXE文件，将其保存到步骤一中的文件夹中去。 大功告成！

推荐使用图标编辑工具AXIcons制作图标文件！

16、邮件合并一步一步学

邮件合并一步一步学：

软件OFFICE2003，EXCEL2003

1、在excel2003中建一个数据表(联系表.xls)如：姓名，身份证号，其它编号，职业，联系方式，输入相应数据，保存；

如想在一张页面中打印多个人的信息，就在excel2003多排几列了！

2、打开一个空白word文档(联系表.doc)，点击工具-信函与邮件-邮件合并，这时在你的右面就会出现一个任务窗格；

3、在窗格中选择信函，然后点击下一步：正在启动文档；

4、选择使用当前文档，点击下一步：选取收件人；

5、选择使用现有列表，点击浏览，选取”联系表.xls”然后在弹出的窗口中选择你建表的工作薄（一

般都是sheet1$）。确定，再确定，点出下一步：撰写信函；

6、在你的word文件中建好你想把数据插入后的格式；

想在一张页面中打印多个人的信息，就用文本框做好，一张页面多排几张文本框而已。

7、点击右面的项目的中其它项目（当然你也可选择插入地址块、问候语），你就会看到姓名、姓名1、姓名2等等，把你想要的项目插入到对应的位置即可。

8、在工具栏上点右键，点击邮件合并，在弹出的邮件合并工具栏中点击ABC，就会在域与你的实际项目中切换，工具栏上其它键自己试好了，懂中文一看就知！

17、工具栏>>自定>>格式>>[浅底纹]搬出来用

矩形>>[浅底纹]>>透明>>阴影

18、把Excel表格转换为图片

许多报纸和杂志都介绍过在Excel中，同时按住Shift键点击“文件”菜单，原来的“关闭”菜单项就会变成“全部关闭”。如果我们在按下Shift键的同时点击“编辑”菜单，原来的复制和粘贴就会变成“复制图片”和“粘贴图片”。利用这一功能，我们可以将一个数据表以图片的形式进行复制，从而将其转换为图片。方法如下：

首先选中需要复制成图片的单元格区域，然后按住Shift键依次选择“编辑→复制图片”命令，接着弹出“复制图片”窗口，选择“图片”单选项后点击“确定”按钮，这时就将选定的表格区域复制成图片了。最后复制到目标只需直接选择“粘贴”命令即可（或者按Shift键再选择“编辑→粘贴图片”命令）。我们