vba 中的单元格对齐创建的 html Outlook 消息答案

【问题标题】：Cells alignment in a vba created html outlook messagevba 中的单元格对齐创建的 html Outlook 消息
【发布时间】：2018-02-15 01:09:53
【问题描述】：

我必须每天生成一封电子邮件，我必须将 excel 单元格复制到电子邮件中（只有两列但很多行）。我正在使用这个功能：

str = "<table>"
str = str & "<head><style>table, th, td {border: 1px solid black; border-collapse:" &  "collapse;}</style></head><body>"
getdata = str

我正在以这种方式生成电子邮件：

With emailpod
    .BodyFormat = 3
    .display
    .To = Sheets("email").Range("H1").Value
    .cc = Sheets("email").Range("H2").Value
    .Subject = Sheets("email").Range("H3").Value & Sheets("email").Range("H6")
    .HTMLBody = Sheets("email").Range("H4") & "<br><br>" & Sheets("email").Range("H5") & "<br><br>" & _
        getdata & "<br>" & "Regards" & .HTMLBody & "</body>"

End With

我有单元格的边框，但我还需要将单元格对齐到边框内。有谁知道怎么做？

【问题讨论】：

标签： css excel vba outlook

【解决方案1】：

将此添加到您的样式 (CSS)

td {text-align:right;}

所以它看起来像这样：

str = str & "<head><style>table, th, td {border: 1px solid black; border-collapse:collapse;} td {text-align:right;} </style></head><body>"

【讨论】：