I have an acronym finder macro that scans a Word documents and locates any acronyms (upper case terms) in that document; it then creates a new word document and inserts the found acronyms (w/o duplicates) in ASC order.
Please see attached Word document "TestDocument.docx" and execute macro "ExtractAllAcronymsToNewDo
cument" for a demonstration.
So far so good... this macro works great.
Now, here's what I need some help with. Instead of adding the found acronyms into a new Word document, I would like to open an existing Excel spreadsheet (e.g., "Aconyms.xlsx") and add all acronyms (again, no duplicates) in ASC order... starting in cell A2.
So, my question, how can the existing macro code be modified to accomplish this?
Note: Please ensure to update the file path (wrkFile.Open) in the two Excel functions: Extract_Acronyms_to_Excel(
) and AutomateExcel()