VBA Word - Building Block (AutoText) - Array - Replace Text with Specific Building Blocks

jc491 · #1 01-03-2016, 06:04 AM

Hi Graham,

pardon me for not reading your instructions, when code blinds me, so does my ability to read

.

I wish to the high stars - Microsoft will sort out the horrendous building block organizer in the next update its long overdue.

I updated the building block to match the search words

An error popped up here

Code:

Application.Templates(ActiveDocument.AttachedTemplate). _
                        BuildingBlockEntries(Rng.Text).Insert _
                        Where:=Rng, _
                        RichText:=True

The building blocks are in template : Building blocks - as I can see in the organiser

Test Example

Text A1 Replace Building Block - A1

Text A2 Replace Building Block - A2I will download the add in and try the second approach as well
I am indebted to you for your help

Thank you Graham

J

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Problem batch adding autotext using Greg Maxey's Building Blocks Add-In	Genuine Gin	Word VBA	5	12-16-2015 10:20 AM
Formatting Issues When Using If Statements and Inserting Building Blocks/Autotext	sanko787	Mail Merge	1	07-05-2014 09:00 PM
Building blocks show correctly in dropdown, but wrong building block populates in doc	wordgirl123	Word	0	10-03-2013 08:30 AM
INSERT building blocks from Quickpart in word	jasserin	Word VBA	0	06-05-2013 12:55 PM
Word - Attach Building Blocks	namedujour	Word	0	04-04-2011 09:59 AM