Adding a Custom Control at Runtime (Word 97SR2)

[Kevin]

I know how to add a form control to a userform at runtime. I
want to know how to add a "custom" ActiveX control at
runtime. Anybody?

[HansV]

AFAIK, the custom control has to be registered. That is, you must be able to find the control's ProgID in the Windows Registry under HKEY_CLASSES_ROOT.

Then you can use code like

Dim ctl As Control
Set ctl = Me.Controls.Add("MyProgID", "MyCtl", True)
With ctl
.Width = 200
' etc.
End With

"MyProgID" is the ProgID, "MyCtl" is the name of the control (if omitted, VB assigns a standard name) and True indicates that the control will be visible (can be omitted, True is default).

For example, to create a calendar control:

Set c = Me.Controls.Add("MScal.Calendar", "MyCal", True)

[Kevin]

Hans,
Thanks. I think your calendar control example puts me on track!