Performance Issue - Adding controls at run time

[rsouthon]

I'm using VBA to add a control to Word at run-time. I'm using the following code to add a checkbox:

Dim m_shape As InlineShape
Dim WithEvents m_check As MSForms.CheckBox

Set m_shape = Selection.InlineShapes.AddOLEControl(ClassType:="Forms.checkbox.1&quot

Set m_check = m_shape.OLEFormat.Object


The problem is that they take forever to load. Does anyone know a way to speed this process up? I would also appreciate any alternate ways to add the controls at run-time.

Thanks