Hi VBA forum,



I am writing a book within a legal field and have a lot of cases referenced in my text. I know I could go through all 600+ pages and mark each case for the index manually but I would prefer to automate the process.

Is there any way to make Word identify the most common case formats? (the most common are on the basis of U YYYY.XXX ending with either Ø, V or H, for example U 1994.237 H)

And in addition, is there any way to make Word mark such entries as an index word automatically?

Yes, it is possible. What have you tried? This is not a complementary code writing service. We are here to help you write your code. Some people write books for a living, others write code .


You would start with a macro that "finds" the desired strings. For example your find text would be:



.Text = "U [0-9]{4}.[0-9]{3} [HV" & ChrW(216) & "]"


When that text is found, you would insert an index entry:


ActiveDocument.Indexes.MarkEntry "Found Range", "Found Text"


Collapse and move the range passed the entry and loop to find next instance of text.


There are plenty of examples of using VBA to find text.

__________________
Greg Maxey
Please visit my web site at http://www.gregmaxey.com/