Microsoft Word VBA - IF&那么找到单词并在另一张表中打印

时间:2017-02-16 22:17:51

标签: word-vba

对于VBA,我有点新手(主要是通过录制操作导航代码,然后根据我的需要对其进行更改)。

我目前的问题如下:

我将从我需要​​的客户端编译包含电子邮件地址的数百个Word文档。为了使这个尽可能简单,我希望有一些代码可以找到他们的电子邮件和围绕电子邮件地址的附加信息(姓名,位置,职位和[可能]电话号码),然后复制并粘贴提到另一个指定文件的信息。文件和上述信息的格式如下:

FirstName LastName
Location
Job title @ Company
email address - phone number

现在,我相信这将包括和IF / THEN声明,因为并非所有客户都在文档中有他们的电子邮件地址。

所以,如果有一个电子邮件地址,那么将它与上面的3行复制,并用“空格”“ - ”“空格”分隔的电话号码将其粘贴到另一张纸上。如果没有电子邮件地址,请继续。

此查询代码可能包含一个需要将“@”和“.com”附加到同一字符串的FIND。这将是必需的,因为该文档还包括具有“.com”和“@”但不在一起的其他文本。

这听起来比实际更难,但我又是一个新手,所以不完全确定。随意提出任何其他问题!

1 个答案:

答案 0 :(得分:0)

这是一个非常广泛的问题,但我建议您执行以下操作: