FixInstanceFactory
From scripting
Sub FixInstanceFactory(NameOfReference As String, NameOfDocument As String) On Error GoTo blast InstFactory.BeginInstanceFactory NameOfReference, NameOfDocument Exit Sub blast: InstFactory.EndInstanceFactory InstFactory.BeginInstanceFactory NameOfReference, NameOfDocument End Sub