Robot Structural Analysis Forum
Welcome to Autodesk’s Robot Structural Analysis Forums. Share your knowledge, ask questions, and explore popular Robot Structural Analysis topics.
cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

Bar Releases (API) - Connection Rigidity Analysis

3 REPLIES 3
Reply
Message 1 of 4
Anonymous
404 Views, 3 Replies

Bar Releases (API) - Connection Rigidity Analysis

Hello,

 

I've done a program for my thesis, dimension steel connection Column-Beam.

But i have a problem, I want to create bar release using API macro in Excel, to apply the Value Rigidity at node.

 

I Know create bar release (after verification steel connection) but i don`t know applying the value Rigidity "13000" kN/m (picture), by connection semi-rigid. In my code i don`t have apply the value. What is the problem?

 

After apply the value rigidity i need to calculate and see the variation of diagrams of bars.

 

I need your help

Thanks

 

Code:

 

Sub Rigidity_Click()
Set RobApp = New RobotApplication

    Dim RLabel As RobotLabel
        
    Dim RelData As RobotBarReleaseData
    Dim EndData As RobotBarEndReleaseData
    
    Const rigidity As Double = 13000
    
    Set RLabel = RobApp.Project.Structure.Labels.Create(I_LT_BAR_RELEASE, "Teste dissertação")
    Set RelData = RLabel.Data
    
    Set EndData = RelData.StartNode
    EndData.Ry = I_BERV_ELASTIC = rigidity
    
    Set EndData = RelData.EndNode
    EndData.Ry = I_BERV_ELASTIC
    
    RobApp.Project.Structure.Labels.Store RLabel

End Sub

 

3 REPLIES 3
Message 2 of 4
Rafal.Gaweda
in reply to: Anonymous

Example code

 

    Dim RLabel As RobotLabel
        
    Dim RelData As RobotBarReleaseData
    Dim EndData As RobotBarEndReleaseData

    Set RLabel = RobApp.Project.Structure.Labels.Create(I_LT_BAR_RELEASE, "MY RELEASE")
    Set RelData = RLabel.Data
    Set EndData = RelData.StartNode
    EndData.UX = I_BERV_ELASTIC
    EndData.KX = 10000
    
    Set EndData = RelData.EndNode
    EndData.UY = I_BERV_ELASTIC
    EndData.KY = 20000
    
    RobApp.Project.Structure.Labels.Store RLabel

 



Rafal Gaweda
Message 3 of 4
Anonymous
in reply to: Rafal.Gaweda

Thanks!

 

 

Message 4 of 4
Anonymous
in reply to: Rafal.Gaweda

Hello,

 

Yes it did. 

I've already applied  the value Rigidity, after calculate my steel connection.

Thanks

Can't find what you're looking for? Ask the community or share your knowledge.

Post to forums  

Autodesk Design & Make Report