小编Dam*_*mes的帖子

HTML电子邮件通过VBA与子弹

我很难在通过VBA生成的自动电子邮件中使我的HTML格式正确.我以前从未使用过HTML,所以这对我来说是一件全新的事情......我已经尝试过在线研究,但我无法理解这一点.

.HTMLBody = "<style> body{color:black;font-family:Calibri;font-size: 11pt;}" & "<HTML><body>Dear " & Addressee & ",<br><br>As you would be aware, the...<br><br>Please find attached spreadsheet showing:<br><br>&emsp;&mdash;&emsp;Example list 1. <br>&emsp;&mdash;&emsp;Example list 2. <br>&emsp;&mdash;&emsp;Example list 3.<br><br> <b>Kindly reply to ALL indicating...</b><br><br> Regards,<br><br>" & Signature
Run Code Online (Sandbox Code Playgroud)

上面的问题是,如果他们随后进入第二行,因为我已经"创建"假子弹,它不会自动缩进行.此外,上面的代码是非常基本的(反映我缺乏理解:/) - 但我基本上想找到一种方法来获得一堆文本,列出3个子弹保持所有格式,就像普通子弹的情况一样(即缩进行)然后得出结论和正常结束的电子邮件.

任何人都有机会帮助我使用HTML代码来制作子弹..?由于机密信息,我已经清除了上述代码中的大量文本.

谢谢!

html excel vba excel-vba

2
推荐指数
1
解决办法
5373
查看次数

返回二维数组中匹配项的行号

我试图在网上找到解决方案,但无论出于何种原因都找不到任何东西(也许是我缺乏搜索技巧)。我觉得这是一个相当简单的查询。

我正在声明一个数组并使用以下内容为其分配数据,我已经确认它正在工作:

Dim arr As Variant
arr = Sheet.Range("A1").CurrentRegion
Run Code Online (Sandbox Code Playgroud)

现在,鉴于这是一个二维数组(只有 2 列数据),我想然后使用匹配类型的函数来返回与数组第 1 列中的值关联的行号。我的最终目标是然后使用它来调用数组第 2 列中的相应值 - 本质上是在 VBA 中构建索引/匹配类型的场景。但是,Application.Match 函数失败,因为它不是一维数组。请参阅下面的示例:

1|Apple   |Fruit
2|Tomato  |Fruit
3|Carrot  |Vegetable
4|Zucchini|Vegetable
Run Code Online (Sandbox Code Playgroud)

我想要实现的是像 MATCH("Tomato", arr(), 0) 这样的东西来获得“2”是与番茄关联的行号的结果。我只需要在数组的第 1 列中进行搜索。有没有人可能对最简单的方法有任何建议?

感谢一百万!

excel vba

0
推荐指数
1
解决办法
96
查看次数

标签 统计

excel ×2

vba ×2

excel-vba ×1

html ×1