我正在尝试从电子表格中获取数据以显示在电子邮件中。如果它连成一排,这很容易。我想要的是数据:
DspG DspN Comp PriSMTP Owner OwnerE
A M_N C_N u@c.com O_N o@c.com
A R_N D_N v@l.com O_N o@c.com
A N_N E_N w@e.com O_N o@c.com
B F_N T_N q@d.com Dif_N i@dd.com
B G_N K_N a@p.com Dif_N i@dd.com
C V_N B_N j@d.com Oth_N b@333.com
仅显示DspG,Owner和OwnerE一次,但从DspN,comp,PriSMTP获取3行数据。重复此操作,其中DspG等于B,然后是C.一直向下到A列。
提前感谢您提供任何帮助/建议。
如果您感兴趣,我正在使用的电子邮件例程是http://www.globaliconnect.com/excel/index.php?option=com_content&view=article&id=170:automate-outlook-using-vba-sending-email-from-excel-using-outlook&Itemid=473
答案 0 :(得分:0)
在您链接的示例中,我相信您应该可以使用:
With miOL
.Subject = "Financial Analysis - 2012"
.Body = Range("A1:F7").Value 'Use the value of the range instead of explicitly stating a string
如果将其作为一行输入或具有奇怪的格式,您应该能够使用For
循环并一次输入每一行,然后换行和回车。