Creating Un nammed groups with VBA

I noticed this topic was discussed previously, as I found it in an old thread. Are the words of advice provided then still applicable to VBA for AutoCAD 2005?

I've attached the old post below...

Reply From: Thilak
Date: Jun/04/00 - 22:53 (GMT-12:00)

Re: Unnamed group?
Corey,

You need to use AsdkUnsupp2000.arx which can be found in the
autodesk.autocad.customization newsgroup.

Cheers,
Thilak

Thanks

DRW

 

Nice job searching! However, I don't believe this is the case any longer. In
R2002 I make use of the following code for anonymous groups:

Dim group As AcadGroup
Dim ents(0 To 1) As AcadEntity
'Create anonymous group for line & text entities of the leader object
Set ents(0) = Annotation
Set ents(1) = Line
Set group = ThisDrawing.Groups.Add("*")
group.AppendItems (ents)

 

Great! I'll try it out...
The documentation on groups is very poor

DRW

 

SUCCESS!!

Thanks a lot.

I am very excited about finally finding this discussion group! Finally people here who talk my language!

DRW