![]() |
|
#2
|
||||
|
||||
|
The following should work if the builkding block is stored in the document template
Code:
Private Sub CommandButton1_Click()
Dim oRng As Range
Me.Hide
If Me.OptionButton13.Value = True Then
Set oRng = ActiveDocument.Bookmarks("AddtValSites").Range
ActiveDocument.AttachedTemplate.BuildingBlockEntries("AddtValSiteBB").Insert _
Where:=oRng
End If
lbl_Exit:
Exit Sub
End Sub
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| How-to: Add a quickpart, field or Building Block Gallery Content Control based on a UserForm | HighSierra | Word VBA | 0 | 05-06-2015 08:20 PM |
How to share building block macros?
|
rdross51 | Word VBA | 7 | 03-12-2015 08:59 AM |
Custom Building Block File Locations
|
ptmuldoon | Word | 5 | 01-03-2015 08:45 AM |
| how to make building block content control determine bb to display elsewhere | jamles12 | Word VBA | 5 | 11-16-2013 11:38 AM |
| Building blocks show correctly in dropdown, but wrong building block populates in doc | wordgirl123 | Word | 0 | 10-03-2013 08:30 AM |