Identifying Solid Black Borders using VBA

[Kumar]

Hello,

I have some old word documents, which look like horizontal lines on
word, but are actually 'solid black border'. Remember, when we type
three or more hyphens,underscores,equal signs, the word automatically
converts it to a solid black border. Using Vba, I need to identify in
my documents, if it is one of these 'solid black borders' and if so,
change to a 3pt line (msoLine type).

How can I achieve this using VBA? Pls advise.

Regards
Kamur

 

[Kumar]

G'day to you too, Steve !

Thanks for the information...but I am still new to vba stuff...

I really dont know how to define them in VBA and how to check for them,
code-wise...If you have examples, would be a great help for me!!

Regards
Kumar

 

[Word Heretic]

G'day (e-mail address removed) (Kumar),

well, where you are at now is in Selection.Range

the way to tell if one range is in another is something like

if MyAnchorRange.InRange(Selection.Range) then

this returns true if MyAnchorRange is inside the selection

then all you need is

ActiveDocument.Content.ShapeRange.GroupItems(1).Anchor

to return the range of each groupitem


HTH


(e-mail address removed) (Kumar) was spinning this yarn:

G'day to you too, Steve !

Thanks for the information...but I am still new to vba stuff...

I really dont know how to define them in VBA and how to check for them,
code-wise...If you have examples, would be a great help for me!!

Regards
Kumar

Steve Hudson

Word Heretic, Sydney, Australia
Tricky stuff with Word or words for you.
Email: (e-mail address removed)
Products: http://www.geocities.com/word_heretic/products.html
Spellbooks: 728 pages of dump left and dropping...

The VBA Beginner's Spellbook: For all VBA users.