Howto programmaticaly add object to existing Group in Database Win

A

Alexs

Howto programmaticaly add database object (table, query, form, etc.) to
existing Group in Database Window?

To create a new group I can use:
Sub AddNewGroup(strGroupName)
SendKeys strGroupName & "~"
Application.RunCommand acCmdNewGroup
End Sub

To add object (server view) to a NEW group I can use:
Sub AddToNewGroup(strGroupName, strViewName)
DoCmd.SelectObject acServerView, strViewName, True
SendKeys strGroupName & "~"
Application.RunCommand acCmdAddToNewGroup
End Sub

It works fine!

But how to ad object to EXISTING group (previously created by AddNewGroup
for example)?
 
Top