Home > In Word > Microsoft Word Macro - Capitalised Words

Microsoft Word Macro - Capitalised Words

Contents

Big picture is that Word ignores the specific needs of the legal profession -- or tries to "fix" things by making them more complicated. But I'm envious of some of those here who have gotten it up and running, when I have not been able to. See: StrOut = StrOut & strFnd & vbTab & Replace(ParsePageRefs(StrPages), ",",", ") & Chr(11)Cheers Paul Edstein [MS MVP - Word] Thursday, April 19, 2012 12:07 PM Reply | Quote 0 Sign Author Bio Allen Wyatt With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. http://magicnewspaper.com/in-word/how-do-i-write-a-macro-to-change-the-font-of-the-next-12-words-after-a-specific-word.html

Helpful Links WordTips FAQ Ask a Word Question Make a Comment Free Business Forms Free Calendars Tips.Net > WordTips Home > Editing > Specific Capitalization Specific Capitalization by Allen Hell yes.) Issues: 1) Please delete the column effect. With the previous versions, though, this is fraught with danger; if anyone deletes the bookmark or, worse, starts typing within its range something you'd really like to retain, the results would The last list I did (just before I started getting the run error messages) looked almost perfect - there's no question that a lot of lawyers will find this helpful. http://dfarq.homeip.net/how-to-find-all-the-capitalized-words-in-a-word-document/

Find Capitalised Words In Word

In this instance I would ideally like "Service Measures" to be found rather than two results: "Service" and "Measures". Also (after re-reading this thread), the macro shouldn't need to interact with any other document - everything should happen in the one document. (I suppose the macro could itself create and What I had wanted is different - a program where I don't have to do anything except run the macro.

It is interesting to note that this problem only occurs in Word 97 and Word 2000. This macro, when finished, will be of great interest to transactional lawyers such as myself. The third group of statements applies title case (first letter capitalized) to the first and last words in the selection, because the first and last words in a heading must always Find And Replace Capital Letters In Word If so, delete it.

Note that the dialog box provides five different ways you can change the capitalization of your text. Find All Caps In Word Simply find and make a table of all words that begin with a capital letter, Defined Term, (like so): and 2. Newer Than: Search this thread only Search this forum only Display results as threads Useful Searches Recent Posts More... https://answers.microsoft.com/en-us/msoffice/forum/msoffice_word-mso_other/search-words-starts-with-capital-letters/256bb528-f91c-45cd-b649-09f31e1b1eb3 If not, you should start a new thread setting out what your needs are.Cheers Paul Edstein [MS MVP - Word] Sunday, December 02, 2012 12:00 AM Reply | Quote 0 Sign

Could I send it to you in a different forum? Find Words In All Caps In Word If you could revise your macro to do this, I promise to disseminate it far and wide - it would be a very helpful tool for all of us in the They were all in "()". Is there a script or macro that can search a doc for words that have all capital letters and are not tagged "all caps"? #2 03-15-2012, 03:06 PM macropod

  1. By the way, I also recommend deleting the Term...
  2. Legal work for clients calls, and it might be a few days. (Also, I do not know how to "Create" your latest macro with a different name like Sub OtherTabulateKeyTerms(), so
  3. See: StrOut = StrOut & strFnd & vbTab & Replace(ParsePageRefs(StrPages), ",",", ") & Chr(11)" because I'm not sure where to put that line.
  4. more stack exchange communities company blog Stack Exchange Inbox Reputation and Badges sign up log in tour help Tour Start here for a quick overview of the site Help Center Detailed
  5. However, David was unable to figure out how to change the initial capital to lowercase.
  6. So, if a "defined term" appears in double-quote marks on more than one page, then the result should be something like Lease . . . . . . . . .
  7. Thank you Thursday, October 23, 2014 5:07 PM Reply | Quote 0 Sign in to vote That would really only be practical if each term appears in a paragraph with full
  8. Term 2,5,11,12,14-16,20,26,31-36,44-46,48,52,54,61,62,64,66,74,75,78,79-81,85-87,89,91,92-94,97,98,101,102,106,128 Commencement Date.............. 5,6,11,26,32,45,46,97,106.............................

Find All Caps In Word

But conjunctions and short prepositions (five letters or fewer, according to the magazine I work for) should be all lowercase. Many thanks Henry Friday, December 14, 2012 4:30 PM Reply | Quote 0 Sign in to vote Hi Henry, Doing (1) would be rather problematic as sentences, proper names & so Find Capitalised Words In Word I note also that your posted list doesn't include the spaces after the commas. Find Capital Letters In Word Fortunately, Word allows you to quickly and easily change the capitalization (case) of text.

If you use a later version of Word, visit our WordTips site focusing on the ribbon interface. As you are an MVP, please forward this to one of the higher-ups at Office. A refinement I've made for reporting terms that appear on 3 or more consecutive pages is to list just the first & last with a hyphen separator. Tech Support Guy is completely free -- paid for by advertisers and donations. Regular Expression Find Capitalized Words

Thank you!!!! #6 01-28-2014, 09:41 AM AlanSowell Windows 7 32bit Office 2010 32bit Novice Join Date: Jan 2014 Posts: 1 Wow Where can I learn more about the Before I paste the long test results below, let me thank you again for your efforts. If it becomes more fool-proof, Istand by my promise to disseminate it far and wide for free. Word changes the case of the selected text.

LinkBack Thread Tools Display Modes #1 03-15-2012, 07:56 AM Bobosmite Windows 7 Office 2003 Advanced Beginner Join Date: May 2010 Posts: 47 Is there a way to find Replace Capital Letters With Lowercase In Word Land 2,4,5,23,25,26,28,29,37,45,46,62,75,96,97,109 Permitted Exceptions............... 2,4,62,92,98,110............................................ Saturday, December 01, 2012 8:36 PM Reply | Quote 0 Sign in to vote There have been a couple of different approaches discussed in this thread.

If you type it at the beginning of a sentence, then you end up with EWidget, since Word capitalizes the first letter of a sentence.

Many thanks again! Would be happy to help MSA start fixing these issues, albeit 20 years late. Cheers Paul Edstein [MS MVP - Word] Edited by macropodMVP Wednesday, April 11, 2012 12:41 AM Wednesday, April 11, 2012 12:19 AM Reply | Quote 0 Sign in to vote Mr. Find And Replace Uppercase With Lowercase Word Stop the macro recording.

He is president of Sharon Parq Associates, a computer and publishing services company. It's easier than it sounds. Problem - once I put my test doc back into virgin condition - with nothing left of the prior lists - and re-ran the macro, I got a run errormessage:"Run-time error If that doesn't meet your needs, please start a new thread setting out your requirements.Cheers Paul Edstein [MS MVP - Word] Friday, December 14, 2012 8:05 PM Reply | Quote 0

It seems that that "capitalize first letter" setting overrides them all. Here are the issues: 1) I was unclear whenI described what I wanted. Enter your e-mail address and click "Subscribe." (Your e-mail address is not shared with anyone, ever.) Want to see what the newsletter looks like? With Doc.Content With .Find .ClearFormatting .Replacement.ClearFormatting 'Find expressions between pairs of double quotes 'They may be smart quotes or ordinary quotes .Text = "[“""]*[""”]"

I've also enhanced the code to convert all double quotes in your document to Word's smart quotes. Edited by glnz Friday, April 06, 2012 8:57 PM Friday, April 06, 2012 5:51 PM Reply | Quote 0 Sign in to vote Hi glnz, Re: Unfortunately, as tested by our Mr. I'd like to create a table that has all of the words that are initialized; two or more capitalized letters that are short for a longer meaning.

If .Bookmarks.Exists(Name:="_Defined_Terms") Then .Bookmarks("_Defined_Terms").Range.Tables(1).Delete End If With .Find .ClearFormatting .Replacement.ClearFormatting 'Ensure all double quotes are properly formatted. .Text = """" .Replacement.Text = """" Now that I have made ALL the document's double-quote marks curly (smart), the list becomes a single, properly alphabetized list. Pages Lease...................................... 4 date of this Lease..................... 4 date hereof.............................. 4 Landlord................................. 4,91,106 School..................................... 4 Tenant..................................... 4,12,106 Demised Premises................... 4 Land....................................... 4 Permitted Exceptions............... 4 Term....................................... 5 Commencement Date.............. 5 Scheduled You may need to adjust the regexp if all your acronyms aren't only upper-case letters (eg some may contain numbers).

I am trying to amend it, with not much luck, to do the following: 1. But, an amazingly useful tool.