I cannot get the group.appenditems to work. I have tried Sub testgroup() Dim icadApp As IntelliCAD.Application, icadDoc As IntelliCAD.Document Dim iCadLibrary As IntelliCAD.Library Set icadApp = GetObject(, "icad.application") Set icadDoc = icadApp.ActiveDocument Set iCadLibrary = icadApp...