Set Room = AcadApp.ActiveDocument.HandleToObject("22add")
This line fails with an error... everything works as it should up to this line.
"22add" is a known entity handle...
AcadApp.ActiveDocument.HandleToObject response with intellesence as it should. The error I get is... Run-time error '48': Error in loading DLL
Dim Room As AcadEntity
AcadApp.ActiveDocument.Activate
Set Room = AcadApp.ActiveDocument.HandleToObject("22add")