Excel VBA代码,用于在多个文档中搜索文本
我正在寻求帮助,我对VBA有非常基本的知识,不能执行复杂的任务,有人能提供代码的基础,我能学习并扩展它吗 代码应该能够执行以下任务: 使用excel中的文档名称列表,打开这些文档(word文档)并在第一页搜索特定文本。如果文本存在,则返回TRUE,否则返回FALSE 请注意,这些文档都存储在子文件夹中Excel VBA代码,用于在多个文档中搜索文本,vba,excel,Vba,Excel,我正在寻求帮助,我对VBA有非常基本的知识,不能执行复杂的任务,有人能提供代码的基础,我能学习并扩展它吗 代码应该能够执行以下任务: 使用excel中的文档名称列表,打开这些文档(word文档)并在第一页搜索特定文本。如果文本存在,则返回TRUE,否则返回FALSE 请注意,这些文档都存储在子文件夹中 谢谢,在发布之前,您必须问自己以下三个不同的问题: 我将试着用你问的方式回答: 1-从excel文件中读取文档名称 Dim fileNames as new Collection For
谢谢,在发布之前,您必须问自己以下三个不同的问题: 我将试着用你问的方式回答: 1-从excel文件中读取文档名称
Dim fileNames as new Collection
For Each name in Range("names")
fileNames.Add name
Next name
2-开放式Word文档
将Microsoft Word 12.0对象库添加到引用中,并使用Word API打开和阅读文档
Dim doc As Word.Document
Set doc = Word.Documents.Open(Filename:=DocumentPath, Visible:=False)
3-在活动文档中查找文本
Dim myRng as Word.Range
Set myRng = doc.Content
然后将find对象用于您的目的,查看文档
您具体需要哪些帮助?您对流程的哪一部分有问题?现在你的问题对这个网站来说太广泛了。