VBA如何将variables插入到电子邮件的正文中

我坚持这个问题，我已经尝试了很多东西，但没有工作。 我想发送这个macros的电子邮件，我可以发送电子邮件，但电子邮件正文不包括名为“许可证”的variables值。 我有columnC上的许可证列表，columnG上的emailE列表和余下的列表。 当我运行这个macros电子邮件是完美的，但许可证不与身体附加，我想发送每个许可证的电子邮件下一行。 任何帮助？

Sub SendReminderMail() Dim OutLookApp As Object Dim OutLookMailItem As Object Dim iCounter As Integer Dim MailDest As String Cells(iCounter & "C").Select Dim permit As String permit = Cells(iCounter & "C").Value Set OutLookApp = CreateObject("Outlook.application") Set OutLookMailItem = OutLookApp.CreateItem(0) With OutLookMailItem MailDest = "" For iCounter = 2 To WorksheetFunction.CountA(Columns(5)) If MailDest = "" And Cells(iCounter, 5).Offset(0, 2) = "Send Reminder" Then MailDest = Cells(iCounter, 5).Value ElseIf MailDest <> "" And Cells(iCounter, 5).Offset(0, 2) = "Send Reminder" Then MailDest = MailDest & ";" & Cells(iCounter, 5).Value End If Next iCounter .BCC = MailDest .Subject = "Soon to Expire" .Body = "Reminder: Your Permit is about to expire Permit#" & permit 'here is the part where i want my permit variables to attach .Send End With Set OutLookMailItem = Nothing Set OutLookApp = Nothing End Sub 

Answer 1

使用

permit = Cells(iCounter, "C").Value

要么

permit = Range("C" & iCounter).Value

看到细微的差别？