Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 02-23-2018, 10:33 AM
MAHE MAHE is offline Find a sentence that starts with certain words and change the style Windows 7 32bit Find a sentence that starts with certain words and change the style Office 2016
Novice
Find a sentence that starts with certain words and change the style
 
Join Date: Feb 2018
Posts: 4
MAHE is on a distinguished road
Default Find a sentence that starts with certain words and change the style

I am working with a rather old document that does not have any styles associated with it. I am trying to make it a more easily navigable document by first adding some styles so I can create a table of contents. There are several hundred instances where the line of interest begins with "State Community Name: " followed by the community name (e.g. State Community Name: GRASSLAND, State Community Name: FOREST). I'd like to change that line, including the text after "State Community Name:" to Heading 1.

There are also lines that contain ' "X" Rank Specifications: ' where X is variable. I'd also like to change that entire line to Heading 2.

It seems like separate VBA scripts could do these, though I'm not much good yet at figuring out scripts on my own.
Thanks!
Reply With Quote
  #2  
Old 02-23-2018, 01:43 PM
macropod's Avatar
macropod macropod is offline Find a sentence that starts with certain words and change the style Windows 7 64bit Find a sentence that starts with certain words and change the style Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,963
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

Unless you're proposing the change the Style of the whole paragraph, you will have trouble with having Word identify a sentence. That's because VBA has no idea what a grammatical sentence is. For example, consider the following:
Mr. Smith spent $1,234.56 at Dr. John's Grocery Store, to buy: 10.25kg of potatoes; 10kg of avocados; and 15.1kg of Mrs. Green's Mt. Pleasant macadamia nuts.
For you and me, that would count as one sentence; for VBA it counts as 5 sentences.

If you're trying to change the Style of the whole paragraph, you can use a wildcard Find/Replace where, for example:
Find = State Community Name:*^13
Replace = ^&
And you set the Replacement Style to Heading1. No macros required.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote
  #3  
Old 02-26-2018, 08:40 AM
MAHE MAHE is offline Find a sentence that starts with certain words and change the style Windows 7 32bit Find a sentence that starts with certain words and change the style Office 2016
Novice
Find a sentence that starts with certain words and change the style
 
Join Date: Feb 2018
Posts: 4
MAHE is on a distinguished road
Default

That's pretty slick, thanks! I should have clarified that "State Community Name:" is only found as a single line (essentially a paragraph in word), so this worked perfectly.
Reply With Quote
Reply

Tags
styles, vba



Similar Threads
Thread Thread Starter Forum Replies Last Post
Find a sentence that starts with certain words and change the style A sentence where choice words are updated when the root word changes. Cacique Word 1 02-10-2017 10:11 AM
How to use find and replace to change text to a custom style wrdy Word 7 03-11-2014 12:09 AM
Find instance of a word in a specific style and change its color hwg Word VBA 7 02-20-2014 10:59 PM
Find a sentence that starts with certain words and change the style How to mark underlined words in a sentence as A, B, C, D (beneath the words) thudangky Word 13 12-12-2013 02:22 AM
Find and replace multiple documents change style BaPW Word 0 08-14-2011 11:12 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 02:06 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2024 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft