Hi Paul,

thanks for the above.

I have now got the code below working but only on my computer. I think the issue is in where I have highlighted red: I think I need to find a way for this path to always be the active document so that the macros work correctly when I send the document to other users.

Any idea how I can do this?


Private Sub CheckBox1_Click()

Selection.EndKey Unit:=wdStory

If CheckBox1.Value = True Then

'
' AdultCommunityDiabetes Macro
'
'
Application.Templates( _
"H:\Coding Files\Referral Form Combined (Template).dotm"). _
BuildingBlockEntries("AdultCommunityDiabetes").Ins ert Where:=Selection. _
Range, RichText:=True

Else: End If

Selection.HomeKey Unit:=wdStory

End Sub



Thanks

Ash