一、在excel中怎么发送邮件
一、建立亲友通讯录
在工作表中建立一个包含不同收件人、主题、内容和附件的亲友通讯录。
二、使用宏实现自动发送电子邮件
打开“工具→宏→Visual Basic编辑器”,单击“插入→模块”插入一个模块,在“工程”窗口中双击插入的模块,打开它的代码窗口,并输入以下宏:
Sub 全自动发送邮件()
"要能正确发送并需要对Microseft Outlook进行有效配置
On Error Resume Next
Dim rowCount, endRowNo
Dim objOutlook As New Outlook.Application
Dim objMail As MailItem
"取得当前工作表与Cells(1,1)相连的数据区行数
endRowNo = Cells(1, 1).CurrentRegion.Rows.Count
"创建objOutlook为Outlook应用程序对象
Set objOutlook = New Outlook.Application
"开始循环发送电子邮件
For rowCount = 2 To endRowNo
"创建objMail为一个邮件对象
Set objMail = objOutlook.CreateItem(olMailItem)
With objMail
"设置收件人地址(从通讯录表的“E-mail地址”字段中获得)
.To = Cells(rowCount, 2)
"设置邮件主题
.Subject ="新年好![来自朋友弗人的问候] "
"设置邮件内容(从通讯录表的“内容”字段中获得)
.Body = Cells(rowCount, 3)
"设置附件(从通讯录表的“附件”字段中获得)
.Attachments.Add Cells(rowCount, 4)
"自动发送邮件
.Send
End With
"销毁objMail对象
Set objMail = Nothing
Next
"销毁objOutlook对象
Set objOutlook = Nothing
"所有电子邮件发送完成时提示
MsgBox rowCount-1
二、如何用电子邮件发送excel工作表
你只要将保存发好的Excel文件作为邮件的附件添加到邮件里就可以了。
所有的邮件客户端和发件页面都有添加附件的链接或按钮。
下图是QQ邮箱的撰写页面
如果你想用你图中所示的在Excel界面中直接发送邮件的话,首先要配置好Outlook
express或Outlook(就是Windows自带的和Office中带的邮件客户端程序(嘿嘿,我从来不用,我喜欢用Foxmail)。
详细配置方式可以查询你邮箱网站的帮助说明,或再与我联系
三、用excel做的表格怎样发送到别人邮箱
1、首先要登陆自己的邮箱,这里以163邮箱为例,你也可以用QQ邮箱189邮箱等其他邮箱,步骤是一样的;先成功登录邮箱,然后找到左上角的写信选项,点击;
2、就会进入写信界面,点击“添加附件”功能,这里可以上传你要发的用excel做的表格;
3、点击添加附件后,会弹出一个方框让你选择要发送的文件,找到你要发送的表格在电脑里的位置后,点击该表格,然后点击右下角的打开;
4、该表格就会上传到邮件的附件里了,主题默认是该表格的名称,你也可以点击主题修改成你想要的主题;
5、你也可以在邮件下方的空白方框里输入你想说的话,可点击文字上方功能修改输入文字的格式,颜色以及插入图片等;
6、添加收件人的邮箱,即你要发给的那个人的邮箱,最后成功把用excel做的表格发送到别人邮箱了。
