Formatting all tables in doc with specific word in title

macropod · #2 05-01-2016, 05:41 PM

Quote:

Originally Posted by jeffreybrown

1) How can I modify a style so it will produce TNR and 10 along with the alignment.

Why not create a Style with the required attributes? If you add that Style to the document template, it will be available any time you need it. See:
http://www.dummies.com/how-to/conten...word-2013.html
http://www.dummies.com/how-to/conten...word-2010.html
http://www.addbalance.com/usersguide/styles.htm

Quote:

Originally Posted by jeffreybrown

2) Also, are there any areas in this macro that could be modified to further use any built in styles within Word?

Well, if you create a Style named 'Tbl', whose attributes correspond to:

Code:

            .Range.Font.Name = "Times New Roman"
            .Range.Font.Size = 10
            .Range.ParagraphFormat.Alignment = wdAlignParagraphCenter

you could replace all those lines with:

Code:

            .Range.Style = "Tbl"

Similarly, if you create a Style named 'TblHdr', whose attributes correspond to:
• Name = "Times New Roman"
• Size = 10
• Bold = True
• Alignment = wdAlignParagraphLeft
you could replace:

Code:

                    .Range.Style = "Strong"
                    .Range.ParagraphFormat.Alignment = wdAlignParagraphLeft

with:

Code:

                    .Range.Style = "TblHdr"

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
VBA Word - Format ALL Tables - Apply Specific Formatting to Sets of Columns – Font, Border & Width	jc491	Word VBA	10	11-04-2015 04:02 PM
Export calendar events from multiple calendars with specific title	rasmus	Outlook	0	02-06-2015 01:58 AM
Formatting contents after Tab of continuous lines or formatting specific area of word	pawii	Word	1	05-12-2014 05:24 AM
formatting specific area of word like we do in office star application	pawii	Word	0	05-06-2014 08:41 AM
True Title Case for First Row of All Tables	Marrick13	Word VBA	14	12-11-2013 09:12 PM