我需要在活动单元格的行中选择几个单元格并将其显示在电子邮件中。
我在互联网上获得了以下内容,但结果是True
。
With ActiveCell
Range(Cells(.Row, "B"), Cells(.Row, "D")).Select
End With
我的电子邮件代码工作正常,但选择效果不佳。
请协助。
答案 0 :(得分:0)
举一个例子来说明你的代码最好是如何编写的,我不知道那些单元格中包含了什么......
Dim emailTo As String
Dim emailSubject As String
Dim emailBody As String
'# ...
With ActiveCell
emailTo = Cells(.Row, "B").Value
emailSubject = Cells(.Row, "C").Value
emailBody = Cells(.Row, "D").Value
End With
'# ...
Call SendEmail(emailTo, emailSubject, emailBody)