Contando palavras específicas dentro de um lote de documentos do Word

Question

Preciso contar o número de vezes que um acrônimo (por exemplo, "ABC") é usado em uma coleção de documentos do Word. A sigla é sempre de três letras e em maiúsculas.

Todos os documentos do Word estão contidos na mesma pasta.

Qual é a maneira mais fácil de fazer isso? Usando um script VBS?

    

Answer 1

Se eles estiverem descompactados (ou seja, não no formato DOCX), qualquer ferramenta de pesquisa de arquivos, como o Windows find pode contá-los. Se estiverem no formato compactado Zip, o Ransack do agente gratuito pode ser pesquisado nos arquivos, bem como em documentos não comprimidos. Ele mostra um resumo com contagens, bem como o nome de cada documento com a string de pesquisa e cada linha que o contém.

    

Answer 2

Experimente o seguinte código VBS:

Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.GetFolder("c:\")
For Each thing in f.files
    If LCase(Right(thing.path, 3)) = "doc" Then
        Set doc = GetObject(thing.path)
                For each wd in doc.words
                    If wd = "cat" then Counter = Counter + 1
                Next
                Doc.close
                set doc = nothing
    End If
Next
MsgBox Counter