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: 

(API) VBA of definition ( uniform planar load and Uniform Load)

11 REPLIES 11
SOLVED
Reply
Message 1 of 12
nhandayasd
989 Views, 11 Replies

(API) VBA of definition ( uniform planar load and Uniform Load)

Hi. . I reading API Load definition but I understan.Please given file VBA uniform planar load and Uniform Load

 

Thanks you.

11 REPLIES 11
Message 2 of 12
rsousa_
in reply to: nhandayasd

I don't known if i get your problem. With a little help with "Getting Started Guide Robot API", you can get there...

 

See the attached file. Of course you need to make your code more robust, than I have in this example, but it is a start point.

 

Regards

Message 3 of 12
nhandayasd
in reply to: nhandayasd

Thanks.

so you do it.

Capture.PNG

Message 4 of 12
Rafal.Gaweda
in reply to: nhandayasd

I do not understand.

Check additional two buttons in attached xls.



Rafal Gaweda
Message 5 of 12
nhandayasd
in reply to: nhandayasd

yes. Great.

THanks you.

Message 6 of 12
A.wikipedia
in reply to: nhandayasd

Thanks.

Please write API given Uniform Load.

Capture.PNG

Message 7 of 12
A.wikipedia
in reply to: A.wikipedia

RG_Adsk

 

Please write API given Uniform Load.

Thanks

Message 8 of 12
Rafal.Gaweda
in reply to: A.wikipedia

Private Sub CommandButton2_Click()

Dim Robapp As RobotApplication
Set Robapp = New RobotApplication

Dim Loads As RobotCaseServer
Set Loads = Robapp.Project.Structure.Cases

Dim Cas As RobotSimpleCase
Dim Recs As RobotLoadRecordMngr
Dim Rec_1 As RobotLoadRecord
    
CaseNumber = 1
    
Set Cas = Loads.Get(CaseNumber)
Set Recs = Cas.Records
Recs.New I_LRT_BAR_UNIFORM
   
Set Rec_1 = Recs.Get(Recs.Count)
Rec_1.Objects.FromText "1"
Rec_1.SetValue I_BURV_PY, 3.23

End Sub

 



Rafal Gaweda
Message 9 of 12
A.wikipedia
in reply to: Rafal.Gaweda

Thanks RG_Adsk.

But erro.

You can do same file VBA of uniform planar.

I is attachment file.Capture.PNG

Message 10 of 12
Rafal.Gaweda
in reply to: A.wikipedia

File attached.

Next time you will write code, I will correct if needed.



Rafal Gaweda
Message 11 of 12
rsousa_
in reply to: Rafal.Gaweda

I absolutely agree with you Rafal.

This is a place to help others, not to do their job, without any effort from their side!

 

"Give a man a fish and you feed him for a day; teach a man to fish and you feed him for a lifetime."

 

Best regards

Message 12 of 12
A.wikipedia
in reply to: rsousa_

Thanks.

I to try.

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

Post to forums  

Autodesk Design & Make Report