Hi Paul,

Thanks for the above.

I've created a custom quick park as discussed and I am running the following code:

Private Sub CheckBox1_Click()

If CheckBox1.Value = True Then

'
' AdultCommunityDiabetesReasonForReferral Macro
' Adult Community Diabetes Reason for Referral
'
Application.Templates( _
"C:\Users\ThurairajA\AppData\Roaming\Microsoft\Doc ument Building Blocks\1033\14\Building Blocks.dotx" _
).BuildingBlockEntries("AdultCommunityDiabetes").I nsert Where:=Selection. _
Range, RichText:=True

Else: End If

End Sub


However, it seems the custom quick part is saved to my temporary files and not the actual document itself. How would I go about ensuring its part of the template?

Also the Macro I am running inserts the quick part exactly where the checkbox is: could you let me know how to code the position at which I want the macro to run?

thanks

Ash

Thanks

Ash