Is there a way to derive the abbreviation from their full words spelling?

Jamal NUMAN · #16 02-23-2013, 02:51 PM

Quote:

Originally Posted by macropod

Hi Jamal,

1. No.

2. Your second screenshot suggests you're trying to call the macro via a link that points to the 'ThisDocument' module in your 'Document1', not in the 'Acronym Manager'. Try activating the document you want to update, then press F11 and run the macro directly from the vbe. As you've noted, the code also provides a means of running it from a different document to the one your list is in. That means you could add it to Word's 'Normal' template and run the macro from there simply comment out the 'Set FRDoc = ThisDocument' line and un-comment the 'Set FRDoc = Documents.Open' line and update the file reference there to point to whever you want to keep your own list (just make sure that document doesn't have any macros).

3. Aside from adding the code to your 'Normal' template, you could keep the file in a 'trusted location'. See: http://office.microsoft.com/en-us/he...010031999.aspx

Sounds that I fail to understand how does this macro work

Scenario:

1. I got two files (screenshot is attached), the file that contains the list and the macro and another file in which I need to run the macro such that
a. The expression is abbreviated the first time it appears on the document
b. The expression in replaced by its abbreviation anywhere it appears on the document

2. Then how I’m supposed to run the macro that that it takes effect on the second file named “D3”
a. Do I need to copy and paste the code to the file “D3”
b. Do I need to copy the list to the “D3”
c. Do I need only to click the code (screenshot is attached) to let it work

Best

Jamal

macropod · #17 02-23-2013, 03:21 PM

Jamal,

You do not need to copy the code to your file. Simply open the 'Acronym Manager' document, switch back to the document you want to process, press Alt-F11, then click on the 'Acronym Manager' macro in the the 'Acronym Manager' document's 'ThisDocument' module and press F5.

The only reason for copying the 'Acronym Manager' macro anywhere is to copy it to the document template (eg Normal.dotm) so that you can use it via Alt-F8 - with the acronym/abbreviation list stored in a separate document that the macro calls.

Jamal NUMAN · #18 02-23-2013, 03:49 PM

Quote:

Originally Posted by macropod

Jamal,

You do not need to copy the code to your file. Simply open the 'Acronym Manager' document, switch back to the document you want to process, press Alt-F11, then click on the 'Acronym Manager' macro in the the 'Acronym Manager' document's 'ThisDocument' module and press F5.

The only reason for copying the 'Acronym Manager' macro anywhere is to copy it to the document template (eg Normal.dotm) so that you can use it via Alt-F8 - with the acronym/abbreviation list stored in a separate document that the macro calls.

Many thanks Paul for the elaboration

1. I opened both files (the one I need to process and 'Acronym Manager' document (attached)

2. While the current document is on the one I need to process I pressed Alt+F11 (attached)

3. I clicked the 'Acronym Manager' document (attached) and then pressed F5

4. Nothing happens to the file that I need to process! The “National Spatial Plan” is not replaced by “NSP”

Where might be my mistake?

Best

Jamal

macropod · #19 02-23-2013, 11:35 PM

Have you added and entry for “National Spatial Plan <tab> NSP” to the 'Acronym Manager' document? I don't see any evidence of it in your screenshots.

Jamal NUMAN · #20 02-24-2013, 12:01 AM

Quote:

Originally Posted by macropod

Have you added and entry for “National Spatial Plan <tab> NSP” to the 'Acronym Manager' document? I don't see any evidence of it in your screenshots.

Many thanks Paul.

That’s for sure. If you check the screenshots of post #16 then you should find that the “National Spatial Plan <tab> NSP” is there (also attached here)!

What might other issues that I should consider to make this macro work?

macropod · #21 02-24-2013, 12:19 AM

In your modified 'Acronym Manager' document, it appears you have a space after 'Plan'. Since your test document doesn't have the space, the expression won't be found. Suggested solution: delete the space after 'Plan'.

Jamal NUMAN · #22 02-24-2013, 03:39 PM

Quote:

Originally Posted by macropod

In your modified 'Acronym Manager' document, it appears you have a space after 'Plan'. Since your test document doesn't have the space, the expression won't be found. Suggested solution: delete the space after 'Plan'.

Very much appreciated Paul for the help. It worked like a charm

As usual, you are a star.

Best

Jamal

WimpievS · #23 06-02-2017, 01:51 AM

Quote:

Originally Posted by macropod

Try the attached document. It contains both an acronym/abbreviation list (that you can edit) and a macro (AcronymManager) to process any acronyms/abbreviations in whatever is the active document. The basic requirement for list management is that each entry be a separate paragraph, with the full expression listed first, followed by a tab then the acronym/abbreviation. Of course, you also can't have two entries with the same acronym/abbreviation.

The code includes comments to show how a separate document might be used for the acronym/abbreviation list instead of the one in the attachment. That might be useful if you were to add the macro to Word's Normal template.

How it works:
Basically, the macro uses a loop to call a series of Find/Replace operations to edit the text in the target document, replacing all occurrences of a given expression and its acronym/abbreviation with just the acronym/abbreviation and, for the first occurrence only, both the full expression and the acronym/abbreviation, the latter enclosed in brackets.

Hi,
I've been reading to find a solution to a problem. Your macro looks awesome, but I get a run time error. If you can help I will be very grateful!
I have a document with a lot of abbreviations after the full words, e.g. Microsoft (MS) and I'm trying to get a macro to populate a list with the acronym MS and then Microsoft, because after using Microsoft the first time I just use MS throughout the rest of the document. I found an awesome macro, but it works the other way around.
Can you help please?

macropod · #24 06-21-2017, 07:55 PM

Quote:

Originally Posted by WimpievS

Hi,
Your macro looks awesome, but I get a run time error. If you can help I will be very grateful!

On which line are you getting the run time error?

hs1972 · #25 01-15-2018, 03:41 AM

Thanks for the code. I'm getting a runtime error 9 - subscript out of range.

When I debug it's getting stuck here:

StrExp = Split(Split(FRList, vbCr)(j), vbTab)(0)

I've saved the downloaded word doc as AcronymList.doc and put it in my documents folder.

Anyone any ideas what I might have done wrong? I'm a little familiar with VBA but definitely no expert so it's hopefully something obvious to everyone else. Thanks in advance.

macropod · #26 01-15-2018, 03:53 AM

You should ensure your document satisfied the requirements of post # 11: https://www.msofficeforums.com/word-...html#post44875

The fact you're getting an error there suggests you have one of more paragraphs that do not include tab characters.

slaycock · #27 01-15-2018, 04:28 AM

The use of an abbreviation following the first use of a term and the abbreviation throughout the rest of the document is actually a poor documentation practise.

A more user friendly way is to have a 'Glossary' at the start of the document which groups all the abbreviations used in the document and which makes it much easier for any user to find a definition, particularly if they start reading part way through the document.

macropod · #28 01-15-2018, 01:55 PM

You're entitled to your opinion, of course, but the practice is quite common and spares readers having to turn to a glossary the first time they encounter an abbreviation. Glossaries usually go at the end of a document, not at the start. Definitions, on the other hand, usually go near the start - but not at the very start.

slaycock · #29 01-16-2018, 01:00 AM

Quote:

Glossaries usually go at the end of a document, not at the start.

That's a very interesting point in relation to how the electronic availability of documents is changing layout. For the documents and dossiers I work with it is rare to find a glossary at the end of a document.

As to the convention of glossaries being at the end of a document, I can envisage this scenario as coming from paper publishing where the glossary is derived by reviewing the galley proofs and putting the glossary at the end doesn't disturb any previous page numbering.

A further point you might find entertaining, is that although the industry I work in has essentially moved to electronic documents, they are still required to be electronic versions of paper documents. In an electronic document there is no need for a visible glossary because just selecting a word/acronym/symbol should pop up its definition but we are not allowed to do that obvious step.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Adding All Non-spelling Words in a Paragraph to Dictionary	SQLUSA	Word	5	07-13-2012 04:05 AM
Why Words doesn’t show the style of the selected words automatically????	Jamal NUMAN	Word	0	04-14-2011 03:20 PM
How to take the tick out of Spelling in GPO?	Swarv	Word	0	09-29-2010 02:16 AM
Automating an address from an Abbreviation	Panzer	Word	0	04-12-2010 06:11 AM
UK spelling on emails	matthew.canwell	Outlook	0	06-19-2009 06:34 AM