如何返回" Text"在Excel VBA中来自一个单词Text写在其中的单元格?

时间:2014-07-10 20:27:02

标签: string excel-vba text cell vba

我正在尝试使用VBA发送工作表的PDF副本。当我的代码看起来像这样时,一切都有效:

With OutlookMail
.To = "email_address@email.com"
.CC = ""
.BCC = ""
.Subject = "No Subject"
.Body = ""
.Attachments.Add FileName
.Send
End With

但我想将.To中的电子邮件地址替换为已写入格式为文本的单元格内的活动工作表中的电子邮件地址。我试过的是这个:

With OutlookMail
    .To = Range("K4").Text
    .CC = ""
    .BCC = ""
    .Subject = "No Subject"
    .Body = ""
    .Attachments.Add FileName
    .Send
    End With

我认为哪些应该有效,但出于某种原因却没有。单元格从K4合并到N4但是如果我在工作表中尝试=K4它会返回整个单元格中的内容,所以我认为这应该没问题。我确信这是一个非常简单的问题,但我已经尝试过查找并尝试使用CStr(Range("K4").Text)而不是运气。有什么建议吗?

1 个答案:

答案 0 :(得分:1)

使用Sheets("SheetName").Range("K4").Value