Tutorial — Femap Api

Create a group named "My Beam" and move all elements with ID > 100 into that group.

Sub MoveLargeElementsToGroup() ' 1. Declare and get FEMAP objects Dim App As femap.model Set App = GetObject(, "femap.model") ' Connect to running FEMAP Dim groupSet As femap.GroupSet Dim elemSet As femap.ElementSet Dim myGroup As femap.Group Dim elem As femap.Element femap api tutorial

' 3. Get all elements Set elemSet = App.feElementSet elemSet.GetAll () Create a group named "My Beam" and move