vba自动生成html,动态生成嵌入在VBA电子邮件生成中的HTML表

我正在尝试创建一个包含正文文本和表格的电子邮件，该表格可以自动生成给定的数据集 . 现在，我从单独的工作表中提取所有输入的数据，然后您只需从下拉列表中选择一个人名称并自动填充数据 . 我希望将所需列中的数据提取到电子邮件正文中间的表中 . 但是，我不知道如何使表格格式化为HTML动态，以便它可以有2,3,1行数据，具体取决于显示的内容 .

我想要的另一个选项是VBA根据列表中的名称自动查找相似的数据，并根据这些自动提取数据，但我不知道是否可行 .

我对VBA非常了解 - 仅在2周前为了这封电子邮件的目的而自学，所以我不是100％熟悉所有选项 . 但是，我在下拉布局中使用循环的一个问题是，必须将自动生成公式的信息粘贴到列中，因此从技术上讲，它们不是空白行 .

我还需要在单独的工作表中插入单元格，因为我需要能够对其进行HTML格式化 . 我不确定我所做的任何事情是否是最好的方式，但我无法找到更好的方法 .

这是我的代码：

Sub SendEmail(what_address As String, subject_line As String, mail_body As String)

Dim olApp As Outlook.Application

Set olApp = CreateObject("Outlook.application")

Dim olMail As Outlook.MailItem

Set olMail = olApp.CreateItem(olMailItem)

olMail.To = what_address

olMail.Subject = subject_line

olMail.BodyFormat = olFormatHTML

olMail.HTMLBody = mail_body

olMail.Display

'olMail.Send

End Sub

Sub SendMassEmail()

row_number = 1

row_number = row_number + 1

Dim mail_body_message As String

Dim full_name As String

Dim amount As String

Dim name_two As String

Dim mail_body_table As String

mail_body_message = Sheet2.Range("B2")

full_name = Sheet1.Range("E" & row_number + 1)

name_2= Sheet1.Range("G" & row_number + 1)

amount = Format(Sheet1.Range("K" & row_number + 1), "Currency")

mail_body_message = Replace(mail_body_message, "replace_name_here", full_name)

mail_body_message = Replace(mail_body_message, "nametwo_here", name_two)

mail_body_message = Replace(mail_body_message, "replace_amount", amount)

Call SendEmail(Sheet1.Range("F" & row_number + 1), "Test 2018", mail_body_message)

'MsgBox "Email Send Complete"

End Sub

vba自动生成html,动态生成嵌入在VBA电子邮件生成中的HTML表相关推荐

qt中调用matlab生成的动态库
前言: 前面已经实现了在vc中调用matlab生成的动态库,请参考:vc中调用matlab生成的动态库现在在前面已经生成好的matlab动态库的基础上,在qt中调用matlab生成的动态库.生成ma ...
QT 生成.so动态库默认生成.so .so.1 .so.1.0 .so.1.0.0
QT 生成.so动态库时,会默认生成.so .so.1 .so.1.0 .so.1.0.0四个文件,其中其他三个文件都是指向.so.1.0.0这个实际的库文件的链接文件,为了版本控制. 要想直接生成. ...
数据可视化练习-用powerBI生成自动播放的动态排行榜
数据可视化练习-用powerBI生成自动播放的动态排行榜前言 1. 前期准备:账号注册及软件下载 2.数据获取及预处理 3.可视化效果搭建 4.发布共享其他前言最近在B站很流行各种动态排行榜视 ...
Excel·VBA自动生成日记账的对方科目
如图:根据日记账/序时账的日期.凭证号为一组,按借贷方向生成相反的科目,并写入H列.可能存在一对一.一对多.多对多等情况的账目目录数组法遍历.判断.写入测试结果多对多问题处理测试结果数组法 ...
echart 多柱图只显示部分数据标签_python|读取Excel生成pyecharts动态分析图
导入数据 #导入所需的库文件import numpy as npimport pandas as pdfrom pyecharts import Bar#导入excel数据data=pd.DataFr ...
使用反射生成 JDK 动态代理
反射反射赋予了我们在运行时分析类和执行类中方法的能力. 通过反射,可以获取任意一个类的所有属性和方法,还可以调用这些方法和属性. 使用反射生成 JDK 动态代理 JDK 动态代理只能为接口创建动态代 ...
windows7下，Java中利用JNI调用c++生成的动态库的使用步骤
1.从http://www.oracle.com/technetwork/java/javase/downloads/jdk-7u2-download-1377129.html下载jdk-7u2-wi ...
「Python」python调用单个C++文件生成的动态库（.so）Part I
环境说明系统:Ubuntu 18.04 python:python 2.7.17 额外环境上面的环境是普通测试,但是最终标题中的任务我需要在docker中执行,很多块内容我也不太懂,所以一步一步测 ...
【Qt】Qt6调用Visual Studio2019生成的动态库详解
00. 目录文章目录 00. 目录 01. 开发环境 02. Visual Studio 2019生成动态库 03. 新建Qt项目 04. 编写测试程序 05. 其它参考 06. 附录 01. 开发 ...
Golang生成C动态库.so和静态库.a
Go 生成C动态库.so和静态库.a 源代码 package mainimport "C" import "fmt"//export hello func he ...

vba自动生成html,动态生成嵌入在VBA电子邮件生成中的HTML表

vba自动生成html,动态生成嵌入在VBA电子邮件生成中的HTML表相关推荐

最新文章

热门文章