How to use activex to search Word documents for a phrase and delete the document?

6 次查看(过去 30 天)
I would like to search through ~100 Microsoft Word documents for a specific phrase (survey), if the document contains (survey) anywhere within the document, I would like to delete the document.
Code at this link works to create a word document, however I am trying to pick it apart to search an existing document.
Then I would need a 'for loop' to cycle through the ~100 documents and delete the document if (survey) is found with an 'if statement'.

采纳的回答

Guillaume
Guillaume 2017-6-15
When all you have is a hammer everything looks like a nail!
Rather than trying to work out how to automate word from matlab, why not simply use the search feature of windows file explorer. Put survey in your search box and restrict the search to word documents. When the result are returned, select all, press delete. done.
  1 个评论
Matt
Matt 2020-3-5
编辑:Matt 2020-3-5
I know I'm very late to the party, but sometimes, there are pedagogical reasons to use a hammer . I'm not saying that your idea is bad at all (and it is where I would have started as well) but there is a learning feature to banging your head as we all know...

请先登录,再进行评论。

更多回答(1 个)

Nirav Sharda
Nirav Sharda 2017-6-12
You can use the 'Word.Selection.Find.Execute' function to find a keyword and then use the delete function in MATLAB to delete files. I am creating a small example for your reference.
% Connect to Word
Word = actxserver('Word.application');
Word.Visible = 0;
Docs = Word.Documents;
% Open the Document
Doc = Docs.Open('filename');
% Find the Keyword
selection = Word.Selection;
logicalOutput = selection.Find.Execute('keyword')
% This will give the document name, you can save it to a cell array
Doc.FullName
% Close word
invoke(Word,'Quit');
delete(Word);
Once this is done you can delete all the files that match the criteria. I hope this helps.

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by