大家好，这期，我和大家分享一个小技巧：工资表数据秒变工资条！

薪资部门，每个月都得制作一次工资条的，别因手慢，而，耽误了发工资，那可是要挨骂的！

闲话少叙，文末会有完整的动画演示，详细步骤如下：

第一步：插入辅助列，并填充序号

辅助列，在Excel中很常用，往往用来添加过渡数据，便于我们后续处理。

填充序号，那也是基础操作，输入开始序号1，2，然后向下拖拉鼠标填充。

效果如下所示：

第二步：复制填充的序号和标题行

这步，用+C复制和+V粘贴就可以了，把第一步填充的序号，再粘贴一遍，这样就形成了多个空白行，如下效果：

再复制标题行，如下所示：

第三步：对辅助列进行排序

好吧，这步总算知道辅助列的作用了吧，对辅助列排序，效果就相当于隔行插入空白行了，如下效果：

第四步：删除辅助列

好了，到此，辅助列的任务完成了，可以删除了，工资条数据也完成了。如下所示：

完整的动画演示

完整的动画演示如下：

好了，本期工资表数据秒变工资条，我就分享到这！

我是Excel技巧，每日分享实用的Excel小技巧。

其实用Excel打印工资条，归根结底就是让Excel制作的工资表格中，一行工资细目数据，一行员工的记录。如果在每一个员工数据的上面插入一行工资细目数据显然我们的要求也就完成了，当然纯手工的一行一行插入显然是个“不可能完成的任务”，这里需要有点小技巧。

在学习如何生成之前，说明几点：

第一点，我生成的工资条是用平推式针式打印机打印。

平推式针式打印机是一般企业都有，因为开具机打的增值税专用发票和普通发票都是必须使用该打印机，有很多企业当初可能还是被强制购买的呢。

第二点，工资条打印使用的241的打印纸。

什么是241的打印纸呢？就是常见的两边带孔的打印纸，类似于增值税专用发票那种，纸的宽度是24.10cm，现在很多企业财务电算化后都是使用的是241-1/2规格的打印纸作为会计凭证打印纸的。

第三点，需要先设置电脑中“打印机”的纸张规格。

为什么要进行这个设置呢？因为有可能我们需要的纸张规格在电脑系统是没有自带的，需要我们手动新增。请看我的以下步骤，如果对电脑不熟悉的可以找一个比较熟悉的操作。

点击“开始”→“控制面板”→“打印机和传真”→对准空白处点击鼠标的右键，会出现以下图标：

点击最后的“服务器属性”，进入：

将上图中的“创建新格式”前的方框选中，选中后“表格名”将由灰色的不可更改变成可以更改的，你就可以录入你喜欢的名称，比如“工资条”。

接着更改下面的“格式描述（尺寸）”。你不知道纸张的尺寸怎么办呢？用直尺量啊！请看下面截图就是241-1/6规格的尺寸。

我们选择的工资条尺寸为241打印纸的6等分。为什么这样选择呢？因为市面上有241-1/3打印纸的出售，相当于是把这种现成的3等分再从中间一分为二，为后面裁切工资条变得更快更好打下基础。

此时，点击“确定”就OK了。以上对电脑的设置只是需要设置一次，不需要以后生成工资条的时候再设置，因此对上述步骤看不懂或对电脑不熟悉可以请人代为设置。

下面，就将如何快速将工资表转换为工资条的步骤。

第一步

将需要转换的工资表“另存”或“复制粘贴”为新的文件，比如“XX月工资条”等。

之所以这样，是为了保护原工资表不被破坏。

第二步

去掉工资表中纵排中原来标题和合计栏等。如下示意图这样：

第三步

将横排不需要打印的栏隐藏。比如将上面的截图中空白的隐藏：

选中不需要打印的直接按上图点击“隐藏”即可。

第四步

在“页面布局”中设置“纸张大小”。如图：

先点击“纸张大小”然后选中241-1/6，如图：

第五步

在“页面布局”中设置“纸张方向”。如图：

先点击“纸张方向”然后选中“纵向”。

第六步

在“页面布局”中设置“打印标题”。如图：

上图的“顶端标题行”：“$1:$1”，既可以手工收入也可点击右边的红色箭头选中第一行即可。然后点击“确定”。

第七部

在“预览”的界面进行“页边距”和“页眉/页脚”的设置。

第八步

调整表格的“行高”，确保预览出来的效果如下图：

这一步没有什么诀窍，多试几次就可以了。你现在看到就是打印出来你将得到的“工资条”。这样的工资条是不是比用函数做成的工资条大方美观的多啊！

附：工资条最全做法

一

手工1次性制作

只适用于本次制作，如果下月还要用，还需要重复操作。

1、排序法

在辅助列中输入1.2.3...再复制该序列到下面的行。在表格下粘贴相同行数的标题行，然后根据辅助列排序即可。

2、插入行法（单行标题）

在辅助列中对角线输入数字，然后定位常量，插入整行。然后复制标题行，再定位第1列空值，粘贴标题行。

3、插入行法（双行标题）

如果是标题行含合并单元格的2行标题，则在拖入行后再次定位插入行，然后再粘贴。

插入空行见方法2

一

技巧函数公式法

该类方法公式设置非常简单，但要借用技巧操作。

1、替换生成引用法。

操作步骤：

第1步 复制标题

第2步 选取第3行右键拖动（或复制 - 选择性粘贴) -链接此处(粘贴链接)，然后用 = 替换为 空格+ = 号

第3步 向下拖动复制（如果工资条间隔一行就多选一行空行）复制

第4步 把 空格+= 替换为 =号

完工，工资条完美制作完成！

2、Vlookup函数法。

复制标题行到第8行 - 在第1列输入1，然后B列输入公式，并向右复制

=VLOOKUP($A10,$A$1:$G$6,COLUMN(B1),0)

最后选取标题行、公式行和空行，向下拖动复制。

三

函数公式法

1、可以直接生成工资条的公式

这是一个比较通用的公式（工资条隔一行）：

=IF(MOD(ROW(A1),2),OFFSET($A$1,(MOD(ROW(A1)-1,3)>0)*ROUND(ROW(A1)/3,),COLUMN(A2)-1),"")

套用公式方法：只需要修改上面公式的$A$1 ，它是工资表的标题行的第1个单元格地址（如果引用其他表，需要加上“表名!”，如工资表!$A$1）。

2、可以折行的工资条

看过很多单位的工资表，和工资相关的项目都很多，有的有几十列之多。这么多列打印成工资条，真的好长好长。结果是字体超小，让人看起来很费眼神。

看一个不算太长的工资条：（为了演示方便以短些的为例）

如果.....变成下面这样：

一行变成两行或多行，工资条马上变得清晰多了。

以上工资条的制作方法你学会了没？你身边要事有做财务的小伙伴，一定要推荐给他们看哦！！

在日常工作中，如果我们能将excel工作表中一些司空见惯的简单功能，巧妙的运用起来，我们会发现这些看似简单常见的功能往往有着我们难以想象的强大作用。

今天我们要聊的话题和工资有关，我们要用排序功能来快速地制作工资条。

首先我们介绍一下工资条大致有哪些内容，具体如下表格：

每个月到发工资时，有些公司会将工资条打印出来让员工签字确认，所以如何做好工资条可是件大事，不然肯定会出大事。

姓名、工号、月基本薪资、应付工资、事假扣款等以上表格中的具体内容的填写是我们所无法避免的事情，但是每个人的工资条都是独立的，所以每个人的表头都是如上面的表格所示的内容。

答案好像已经出来了，我们先做好表头，然后在就不断复制，然后填数据，然后复制表头，然后填数据……个人感觉，如果只有十个员工，我是肯定能接受这种方法的，但是如果有100甚至更多数量的员工，这样做绝对是不智之举。所以今天在这里推荐一种简单易学的快速生成工资表的方法。

为了节省时间，我们这里就以十个人为例了。

首先我们将如上表的表头做很好，然后将十个员工的工资条具体数据在下方依次填好，具体如下表，我们可以看到丁一、牛二、张三等十人的工资条具体数据已经填好，就差给每个人的工资条都加个表头了。具体操作如下图所示：

现在的任务就成了怎样将工资表的表头穿插上去了。

首先我们将表头复制到第十二行，也就是员工汪成工资条具体数据最下方，在通过填充柄拖拽复制出8个表头，这样加上第一行的表头，我们的excel表中就有10个表头了，与员工数目正好相等。

建立辅助列：我们在L列第一行输入1，然后按住ctrl键，利用填充柄进行拖拽，一直拖拽到员工汪成所在的行，形成1到11的十一行的数据，在L列第十二行输入2.4（2到3之间即可），然后按住ctrl键，利用填充柄进行拖拽，一直拖拽到二十行，形成2.4,到10.4的9行的数据。具体操作如下图所示：

最后，选中辅助列（L列）上任意数据所在的单元格，找到并点击升序排序，我们的工资条就得到快速的生成了。具体操作如下图所示：

在上面这个例子，由于人数太少，这种方法的优势无法明显的体现出来，但是试想一下如果对象是100个员工的话，如上所示的方法必然会大大节省了工作的时间。

觉得对你们有用的小伙伴们请点赞关注吧！您的鼓励是我前进的动力，也希望擅长运用办公软件的小伙伴们能够不吝赐教，积极的留言，教会小编更多的excel运用的小技巧，欢迎一起来探讨学习！！！

在工作中，我们在Excel的中处理数据的时候，经常可能存在需要快速将各个分表的数据按照一定的规则合并成一张总表中，但有时我们又需要快速将总表的数据按照约定拆分成各个工作表。

对于这种重复性很强的工作，我们其实可以考虑一键操作，因为数据的处理是有规律的。当然这个要求源数据必须是完整的。

如下图为我们的源数据区域，我们需要按照B列的部门进行数据的拆分到不用的工作表当中，并且以相应的部门为工作表名称。

操作动画如下：

该代码可以保留总表的格式，但无法保留总表的公式。其实代码也是非常的简单的语法堆积出来的，都在最最简单的循环和字典，数组和一些功能代码组合而成，其实VBA真的非常简单。

代码参考如下：

以上就是今天要和大家分享的技巧，希望对大家有所帮助，欢迎大家帮忙转发，谢谢！

祝各位一天好心情！

Excel中每一个方法都有特定的用途，不是他们没有用处，只是你不了解或者暂时用不着，建议你收藏起来，万一哪天用着呢？

这是某公司上月的工资明细表（全是猛人），现在要求是要在每一位员工的工资明细上面加上工资表头和一个空行，工资保密，每个人只能看到自己的工资。

工资表

公式法

1.首先在工资表的后面新建一张工作表（此实例为表3），并把工资表里的表头复制一份过去，在A2单元格写上序号 1

表1

2.在B2单元格输入以下公式，向右侧拖动。

=VLOOKUP($A2,1!$A$1:$J$16,COLUMN(),)

说明：1！指的工作表的名称，可以自行更改为实际的工作表名称

达到的效果如下

表2

3.选中上面的的3行，并按住鼠标左键向下拖动。

表3

是不是超快又简单？

VBA方法

1.开发工具-VB-插入模块，将下面的代码复制，保存后退出

Sub 工资条()

Dim i&, Mxrow&

Sheets(1).[a1].CurrentRegion.Copy Sheets(2).[a1]

With Sheets(2)

Mxrow = .Cells(.Rows.Count, 1).End(3).Row

For i = Mxrow To 3 Step -1

.Rows(i & ":" & i + 1).Insert Shift:=xlDown

.Rows("1:1").Copy .Cells(i + 1, 1)

Next

End With

End Sub

2.在表1中建一方框，然后点右键，指定宏为先前建立的<工资条>

表4

3.点击，看下工作表2，是不是达到了同样的效果。

完整的操作动态图片如下：

动态图

此方法同样可用于老师制作各学生的成绩表。

通常我们所收到的工资条都是有一个工资汇总表进行拆分之后所得到的，很多HR在进行拆分的时候都为此花费大量的时间和精力，今天我们就来教教大家一些简单的方法，可以批量制成工资条，可以直接进行工资条打印工作，下面就一起来看看吧！

首先我们需要的一个工资汇总表，格式大概是每个员工都有自己专属一行的工资明细，而我们要得到的工资条除了员工一行的工资明细，还要每个员工的专属表头。其实工资表很简单，就是一张普通的表格。工资条也很简单，因为所有单元格都是用的同一个公式。也就是

=IF(MOD(ROW(),3)=1,Sheet1!A$1,IF(MOD(ROW(),3)=2,OFFSET(Sheet1!A$1,INT(ROW()/3)+1,0),""))

我们再一起分解开来了解一下：

=IF(

MOD(ROW(),3)=1,

Sheet1!A$1,

IF(

MOD(ROW(),3)=2,

OFFSET(Sheet1!A$1,INT(ROW()/3)+1,0),

""))

01行，第1个IF语句，其条件在02行；

02行，判断当前行是否是工资条表头应该所在的行，即第1、4、7、10……行；

03行，当02行的条件为TRUE时，值为Sheet1!A$1，即表头；

04行，当02行条件为FALSE时，进入第二个IF语句

05行，判断当前行是否是工资条数值应该所在的行，即第2、5、8、11……行；

06行，根据对Sheet1第1行计算偏移来引用工资表数据；

07行，即不是表头也不是数值，那就是用于间隔的空行啦!

这个公式中两次用到MOD(ROW(),3)，一次用到INT(ROW()/3)。那么当前行号和3有什么样的关系呢？注意到，每个工资条的构成，是一行表头，一行数据，一行空白，正好3行。如果你觉得1行空白打印出来不方便裁切，想留2行空白，那这三个公式里的3都应该改为4。

现在是调整格式的时候。首先我们不希望空白行上有表格线，所以，工资条打印的时候不能选打印网络线；但是我们希望工资条的表头和数据有线条来分隔，所以需要为这两行数据加上表格线。当然，可以填充完整个工作表之后再一个个工资条去设置，只是这样太麻烦，所以我们使用“条件格式”功能。

还是选中A1，打开条件格式对话框，选择条件为公式：=MOD(ROW(),3)<>0；然后将格式设置为四周边框线，确定。

现在来填充整个工作表。选中A1，向右拖动右下角长得像“+”号的填充柄，直至所有工资项(这一行是表头)都已填充出来。

这时候，第1行所有表头项是选中的。现在该向下拖动填充柄，直到所有人的工资条都有为止。这个根据工资表中的人数就可以计算，这里填充的行数就是人数的3倍(记得上面专门提到的3吗？如果你改成了4，那就是4倍)。

除了通过Excel来进行工资条打印工作之外，使用方便快捷的蚂蚁工资条软件也是非常好的选择。用户只需使用自己的工资表，并将表格上传到系统中。系统会自动识别表头和数据，将工资表拆分为工资条，可以选择将其打印出来发放，也可以选择多种方式来发放给对应的员工，每个员工仅能收到自己的工资条，既方便，又增强了工资保密度。

本文由蚂蚁工资条整理发布，转载请注明出处。

excel快速批量制作工资条，没想到这么简单！

假如我们需要用excel制作这样的工资条：

我们想要的excel工资条

里面很多格式都是重复的，难道我们要一个一个去做吗？当然不是，那样会累死的！那要怎么去快速、批量的去制作呢？

如果我们有这样的excel数据：

我们有的excel数据

现在我们想要的是在每个姓名后插入一行，一行一行的去插入吗？当然不是！

我们在后面添加2个辅助列，是这样的：

我们添加辅助列

1、这样的辅助列可以填充序列，很容易得到，选择辅助列范围-定位条件-空值：

定位空值

2、右键插入-行，这样我们很容易就在每个人之间插入了空行：

快速插入了空行

3、复制表头列-选择工资条区域-定位条件-空-粘贴表头列-插入空行-调整行高-设置单元格格式-取消竖线

批量复制的excel表头

批量插入空行

今天的分享就到这里，怎么样，很简单吧，你学会了吗？快去试试吧！非常感谢您观看文本，如果你有更好的方法适用这个情况，请您留言分享！分享好玩、有趣、实用的手机和电脑技巧，您的支持就是我的最大动力！

excel快速制作工资条

现在对于工资条，有的企业发放纸质工资条，有的是电子版。但是不管哪种形式的工资条，员工收到的工资条都只能显示该员工的工资信息。基于这一点，不少HR在做工资条的时候会感到头大，做工资条的工作量可能要比做工资表的工作量还大。

大家都知道，一个企业每个人的工资条里显示的工资分项都一样，只是里面数据不同，那有没有一种简便的方法，让发工资条“大事化小”呢？答案是肯定的。下面给大家介绍使用Word、Excel、Outlook，通过邮件批量给员工单独发放工资条的方法。

其实，这种方法使用的是Word邮件合并功能，除了用于群发工资条外，还可用于批量制作员工牌、邀请卡等，非常的实用。需注意若使用的不是相同的版本，那么所显示的界面和功能的位置会有所差异，以下操作供大家参考。

第一步：根据公司薪酬管理制度和国家法律法规，核算每个员工的月度工资，建立Excel版工资明细表。工资表中除工资中各项目字段外，还需要增加每位员工的“邮箱地址”，用于接收公司发送的工资条邮件。

第二步：用Word制作一份工资条模板，该模板就是要发送给每为员工的工资条内容，需根据公司的实际情况和要求进行设计。Word工资条中所有字段必须在Excel工资明细表中能找到数据来源，但不一定要包括Excel中的所有字段。

第三步：确保Excel工资明细表和word工资条模板处于打开状态，在Word工资条模板上依次点击“邮件-开始邮件合并-邮件合并分步向导”。

第四步：在跳转后页面中的右侧上部“邮件合并”窗口中，选择“电子邮件”，然后在右侧下部选择“下一步：开始文档”。而早期版本为“下一步：正在启动文档”。

第五步：在跳转后页面中的右侧上部“想要如何设置电子邮件”中选择“使用当前文档”，然后在右侧下部选择“下一步：选取收件人”。

第六步：在跳转后页面中的右侧上部“选择收件人”中选择“使用现有列表”，在右侧中部选择“浏览”，在弹出的“选取数据源”窗口中，找到在步骤一创建的Excel工资明细表。然后，在弹出的“选择列表”中，选择带有工资数据的那张表。

第七步：在弹出的“邮件合并收件人”窗口中显示的是所有员工的数据，需要确保与工资表中的数据一致。每行数据前边的“√”表示你选择了要给该员工发送邮件，如果不给某位员工发邮件，在该员工前的“√”上点击取消，然后点击确定。

第八步：然后在跳转后的页面右侧下部点击“下一步：撰写电子邮件”。

第九步：完成步骤八后，在Word工资条模板中，用鼠标光标放在（或点击）工资条项目旁边需要插入信息的位置。如需要在“员工姓名”后边插入每位员工的姓名，就把光标点击“员工姓名”后边的单元格，在右侧上部“撰写电子邮件”栏中点击“其他项目”；在弹出的窗口“插入合并域”选择“员工姓名”后依次点击“插入”、“关闭”，这一步骤是在Excel工资明细表和Word工资条之间建立“链接”关系。其它字段类似操作，依次重复前面的步骤就可以把Word文档中所有需要链接的字段全部“插入”了Excel表中的具体内容。这里需要注意的是：先把光标放在Word中需要插入的位置上，其次点击“其他项目”，然后在列表中找到对应字段，最后点击“插入”和“关闭”。

第十步：全部链接完成后，检查链接无误后，点击右侧下部选择“下一步：预览电子邮件”，可在右侧上部选择不同员工预览；预览无误后点击右侧下部“下一步：完成合并”。

第十一步：在跳转后的邮件选项窗口，点击右侧上部“电子邮件”。然后在跳转后页面中的“收件人”选择Excel中员工的“邮件地址”，主题行就是邮件主题，邮件格式建议选择“HTML”（发送时在文件正文且保留word所有格式）或者附件，发送记录可选择全部发送或部分发送。

第十二步：点击“确定”后，系统自动启动outlook并开始后台自动发送。工资条邮件发送后，员工将会收到如下形式的邮件。如果你不希望工资条的内容在邮件正文中显示，而是作为邮件的附件，可以在步骤十一中将“邮件格式（M）”栏“HTML”改为选择“附件”就可以实现。

完成以上所有步骤后，通过邮件批量给员工单独发送工资条就可以顺利实现。

本文由蚂蚁工资条整理发布，转载请注明出处。蚂蚁工资条可将Excel工资表自动生成工资条，并以短信、邮件或微信的形式发送给员工。使用蚂蚁工资条，将极大地提升HR的工作效率，也能减少与员工的沟通成本，促进员工满意度的提升。

人力资源的薪酬管理人员经常会遇到需要发送《调薪通知单》、《年收入12万申报》、《工资条》的工作。如果是劳动密集型的企业并且人数较少的情况，相对比较简单。直接打印纸质版本安排签收。如果遇到企业员工分散，人数众多的情况，制作纸质版本打印、发放、签收、归档相对难度较大。

太繁琐了

这个时候我们经常会用到邮件合并里面电子邮件功能，实现批量发送。本文将以工资条发放为例，详细介绍操作步骤，抛砖引玉。【第一：软件准备阶段】

需要安装office软件里面的word、excel、outlook三个组件。强烈建议上述三个软件为同一个版本。配置outlook经常会出现各类错误，如果配置以后有机会发文探讨。本人使用的是office2010版本。

笔者的office2010 版本。

【第二：数据准确阶段】

发送工资条，核心的数据就是工资表中的工资明细。把发送给员工的信息从工资表中复制出来，放到一张excel表里。需要特别注意的是工资条的表头字段不能重复，字段和第一行数据中间插入一行录入小写英文字母a，主要是防止word模板生成数据时出现多位小数的情况。亲，一定要记住是小写英文字母哈。

我是工资条数据源

【第三：工资条邮件模板准备阶段】

大家可以根据实际需要，使用word编制邮件的正文。我建议邮件正文分成3个部分。第一部分：收件人、工资条月份及核算期等信息，错误申诉途径等。

正文第一部分

第二部分：工资条正文模板，主要是把工资条的项目罗列清楚，一目了然。

正文第二部分

第三部分：薪酬核算说明。大家可以把常见的薪酬项目含义及政策放入其中，便于大家理解工资项目。

正文说明部分

【第四：工资条数据生产阶段】

我们在word文件中制作完了正文模板，现在就需要把excel的数据引用到word文件中。具体的操作如下图：

1。在邮件正文中选择邮件-开始邮件合并-邮件合并分布向导。

2.邮件合并分布向导中选择使用现有类别-选择另外的列表文件

3.选择我们之前制作的excel文件

强烈建议邮件正文及数据放在一个文件夹内

4.选择数据所在的sheet

5.使用插入合并域将excel的表头字段插入到对应的空格中。

将姓名加入姓名栏

6.所有域全部插入后，选择预览结果，可以看到最终的显示效果。

最终预览效果

【第五：邮件发送】

excel数据中工资数据、邮箱、word正文查看结果显示均无错误后，可以进行邮件发送。邮件发送前需要打开outlook。

1.在菜单栏选择完成合并-发送电子邮件

发送电子邮件菜单

2.弹出的窗口如下：

邮件发送窗口

3.收件人选择：邮箱； 主题行录入：XX月工资条 ； 邮件格式：htm； 选择发送范围：从第二行开始，第一行是字母a行。

邮件设置

【第六步：检查核对】

去outlook邮箱查看发送失败记录，甄别失败原因后，重新发送。下图是：outlook查看的发送记录及正文信息。

outlook发送记录及邮件内容

下图是：邮件箱的邮件主题信息。

收件箱主题信息

【注意事项】：

1.使用excel、word、outlook进行涉密信息发布的时候，仔细核对是必须的，邮箱差行将造成所有数据发送错误，间接导致薪酬泄密事件。薪酬岗位风险控制意识要时刻紧绷。2.如果邮件人数超过500人，建议每次发送100到200行数据，过多可能造成电脑死机。薪酬岗位人员最好要和行政申请配置稍高的电脑。时间仓促，如果本文出现任何错误和疏漏，欢迎大家批评指正。求扩散、求关注。

写在前面：What is the exchange ratebetween the US Dollar and the Euro today?

或许在人资或者财务人员正常工作中会遇到要批量发送邮件的工作，例如财务部根据每个人的工资情况发放工资条到个人的邮箱，需要完成大量的重复工作，非常适合批量发送。

因涉及到大量重复的工作，我们就想到如何让这重复性的工作进行自动化，如何利用表格建立数据，利用邮箱自动来发送这些数据，要求发送文件到对方的邮箱。

这个例子你有没有遇到过？每个月工资条如何发放给大家是一个头疼的事情，因为工资涉及到保密问题，用邮件吧，每个人的邮件内容都有些不一样的地方，人一多就特别容易出错；光这个发工资条就够让人忙活好长时间的了

我们今天就来赶紧聊一下大家之前关心的一个问题，如何让Excel通过QQ邮箱自动发送邮件？

如下图所示，是一份名为“数据”的工作表，A列是收件人的邮箱，B列是邮件的标题，C列是邮件的正文，D列用于标注是否成功发送邮件。

PS:或许你就要问了，何为SMTP密码？我们将在下方解释。

点击按钮运行代码即可达到批量发送邮件的目的。

代码如下：

PS:变量strPath指定了邮件添加附件存放的路径和名称，给不同的人发送相同的附件。当然这个也可修改成发送不同的附件。

如果将一封邮件发送多人，不同收件人之间使用半角分号间隔即可，例如：

"1@qq;5@qq;6@qq"

我们要如何获取邮箱的smtp服务码呢？其实很简单的

打开网页版qq邮箱，依次单击【设置】→【账户】；找到POP3/IMAP/SMTP/Exchange/CardDAV/CalDAV服务，选择开启IMAP/SMTP服务。开启SMTP服务后，会获得相关密码。

例外需要说明的一点是上面的代码稍加修改也可以用于我们常用的163邮箱发送邮件。

我们只需要修改发件人的邮箱地址、名称和对应的smtp服务密码。同时将以下语句：

.Item(strURL & "smtpserver") = "smtp.qq"

修改为：

.Item(strURL & "smtpserver") = "smtp.163"

以上就是今天要和大家分享的技巧，希望对大家有所帮助，欢迎大家帮忙转发，谢谢！

祝各位一天好心情！

Excel中每一个方法都有特定的用途，不是他们没有用处，只是你不了解或者暂时用不着，建议你收藏起来，万一哪天用着呢？