I want to group notes that I'm making via a macro. I think that I need to use the CreateGroup, but I get stuck.

Private Sub CommandButton1_Click()

Dim myNote(5)                   As SldWorks.Note

Dim vmyNote                     As Variant
Dim instance                    As IModelDoc2

Create a couple of Notes, where I use myNote(0) to myNote(5)

vmyNote = myNote

instance.Creategroup This is where I go wrong, I can save all the notes that I just created in vmyNote, but I'm not able to group them

End Sub