Edit Existing Synthesis Resources/VBA

Tutorial: Edit an Existing Synthesis Resource
Below is the VBA version of the tutorial.

VBA Sub Main MyRepository Repository MyRepository.ConnectToRepository MyRepository.Project.SetCurrentProject(1) Amodel cModel AModel = MyRepository.Model.GetModel(21) Amodel.Name = Amodel.ItemDescription = Amodel.ItemPartNumber = MyRepository.Model.UpdateModel(AModel) End Sub