OpenSTAAD V8i
Returns the member number of the last plate in the model.
(Numeric value) The number of the highest plate number in the model as a long variable.
Dim objOpenSTAAD As Object
Dim LastPlateNo As Long
'Get the application object --
'Get last plate no.
LastPlateNo = objOpenSTAAD.Geometry.GetLastPlateNo ()