how choose the parts together

Dear Sir/Madam,

Hello, I want to use the VBA to make two parts to move together. I use the “boolstatus = swModel.Extension.SelectByID2("", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)” to choose the part, but how to choose the two parts together.

I shall appreciate hearing from you and thank you for your help sincerely.

Yours Truly,

Chen

SolidworksApi/macros