我目前正在尝试将表单中的名称添加到Outlook上的电子邮件中。但是,我只能从一个成功运作的工作表中捕获:
.Subject = "New Form Name: - " & Worksheets("Form1").Range("C50")
但是我希望代码能够检查是否填写了另一个字段中的另一个工作表,并使用其中包含数据的工作表。
我试过这个(使用Or),但没有运气:
.Subject = "New Form Name - " & Worksheets("Form1").Range("C50") Or Worksheets("Form2").Range("A25") Or Worksheets("Form3").Range("B19")
以上内容不会在电子邮件的主题行中生成任何内容。
有没有办法让它显示哪个工作表中有数据并捕获它。
任何帮助都会很棒!
答案 0 :(得分:0)
假设您要检查您编写的订单,请使用此选项:
Dim sName as String
sName = Worksheets("Form1").Range("C50")
If sName = "" Then sName = Worksheets("Form2").Range("A25")
If sName = "" Then sName = Worksheets("Form3").Range("B19")
.Subject = "New Form Name - " & sName
如果这三个人都没有名字并且按照特定顺序查看,则会显示sName
的空白,但这足以满足您的确切需求。