Inserção de Objetos em Tela via script no Modelador Elétrico

#1

Bom dia,

Espero que estejam bem!

Tenho uma dúvida em relação a scripts, estava fazendo testes com o método AddObjects com intuito de adcionar objetos em telas via scripts. Alguém saberia me dizer se é possível utilizar este mesmo método para adicionar objetos na tela do modelador elétrico por meio de scripts?

#2

Sim, conforme esta documentação.

Sub xo_CustomConfig()
	' Otbtem o objeto Sistema do Modelo Eletrico
	Dim objCADSys
	Set objCADSys = Application.GetObject("ConfiguracaoPower").CAD.System
	
	' Cria PowerSubstation
	Dim objPowerSubstation 
	Set objPowerSubstation = objCADSys.AddItem("SUBSTATION")
	objPowerSubstation.Name = "SE01"
	objPowerSubstation.X = 25
	objPowerSubstation.Y = 25
	
	' do stuff...
	
	' Cria disjuntor
	Dim objBreaker
	Set objBreaker = objPowerSubstation.AddItem("BREAKER")
	objBreaker.Name = "52-01"
	objBreaker.X = 25
	objBreaker.Y = 25
	objBreaker.Rotation = 270
	
	' do other stuff...
End Sub
#3

Certo, muito obrigado Leandro pela ajuda.