SAP2000 y visual basic

Responder
Avatar de Usuario
gustavini
Usuario Frecuente
Usuario Frecuente
Mensajes: 172
Registrado: Lun Oct 25, 2004 11:57 am

Estimados

Estoy aprendiendo a programar en visual basic para hacer aplicaciones para SAP2000. Recien hice algo bien basico que es para dibujar un elemento shell rectangular con las coordenadas que se obtienen de una planilla excel. Eso esta listo, pero ahora quiero definir el espesor del shell y el material que se le asignará y aun no se como hacerlo. Alguien sabe como??
les dejo el codigo que se ejecuta desde el visual basic del excel 2007

Sub AddAreaObjByCoord()
'dimension variables
Dim SapObject As SAP2000.SapObject
Dim SapModel As cSapModel
Dim ret As Long
Dim x() As Double
Dim y() As Double
Dim z() As Double
Dim Name As String

'create Sap2000 object
Set SapObject = New SAP2000.SapObject

'start Sap2000 application
SapObject.ApplicationStart

'create SapModel object
Set SapModel = SapObject.SapModel

'initialize model
ret = SapModel.InitializeNewModel(Ton_cm_C)

'create model from template
ret = SapModel.File.NewBlank

'add area object by coordinates

ReDim x(3)
ReDim y(3)
ReDim z(3)
x(0) = -Range("d12") / 2: y(0) = 0
x(1) = Range("d12") / 2: y(1) = 0
x(2) = Range("d12") / 2: y(2) = Range("f8")
x(3) = -Range("d12") / 2: y(3) = Range("f8")

ret = SapModel.AreaObj.AddByCoord(4, x, y, z, Name)


'refresh view
ret = SapModel.View.RefreshView(0, False)

'close Sap2000
Set SapModel = Nothing
Set SapObject = Nothing

End Sub
jose-fierro
Usuario Intermedio
Usuario Intermedio
Mensajes: 59
Registrado: Lun Jul 20, 2009 11:58 am

el tema que desarrollaste la interrelacion del sap2000 y el visual basic es muy interezante y poco estudiado, te pregunto si tenes alguna otras rutinas en visual basic que me podas facilitar a mi correo jey@ipe.bo.

Saludos
Jose Fierro
gsotoh
Usuario Principiante
Usuario Principiante
Mensajes: 4
Registrado: Sab Jul 19, 2008 10:17 pm
Ubicación: MARACAY

Saludos, he encontrado información referente al tema, me parece muy interesante, seria bueno si intercambiaramos la información que tenemos, mi correo gsotoh@gmail.com
Avatar de Usuario
ajmojicar2002
Usuario Master Superior
Usuario Master Superior
Mensajes: 446
Registrado: Mié Sep 22, 2004 8:44 pm
Ubicación: SANTA MARTA

gsotoh escribió:Saludos, he encontrado información referente al tema, me parece muy interesante, seria bueno si intercambiaramos la información que tenemos, mi correo gsotoh@gmail.com
Será que dicha información se puedaublicar en estos medios?

Tate.


ajmojicar
Fanschop
Usuario Principiante
Usuario Principiante
Mensajes: 5
Registrado: Mar Dic 14, 2010 8:20 am

Estimado gustavini:

Es posible que publiques cuales son los pasos para crear una aplicacion en Visual Basic para sap2000?

Saludos
jose-fierro
Usuario Intermedio
Usuario Intermedio
Mensajes: 59
Registrado: Lun Jul 20, 2009 11:58 am

estimado Gustaviti:

no conoces algun libro o foro donde te den mayores luces al respecto de programacion para sap2000 V14
Saludos
Jose Fierro
Avatar de Usuario
gustavini
Usuario Frecuente
Usuario Frecuente
Mensajes: 172
Registrado: Lun Oct 25, 2004 11:57 am

Estimados:

El mismo SAP2000 viene con un manual en pdf que explica todo sobre esta materia. Yo solo viendo esa informacion, he podido hacer programas en visual basic que me han simplificado bastante el trabajo.

Saludos
Avatar de Usuario
ajmojicar2002
Usuario Master Superior
Usuario Master Superior
Mensajes: 446
Registrado: Mié Sep 22, 2004 8:44 pm
Ubicación: SANTA MARTA

gustavini escribió:Estimados:

El mismo SAP2000 viene con un manual en pdf que explica todo sobre esta materia. Yo solo viendo esa informacion, he podido hacer programas en visual basic que me han simplificado bastante el trabajo.

Saludos
Excelente aporte
joserodolfo
Usuario Principiante
Usuario Principiante
Mensajes: 2
Registrado: Mar Mar 12, 2013 2:54 am

Buen día gustavini, copio el código en el visual basic del excel y me dice error de compilación en Sub AddAreaObjByCoord()
Podrías ayudarme? Muchas gracias!
Responder
  • Similar Topics
    Respuestas
    Vistas
    Último mensaje

Volver a “OAPI Open Application Programming Interface”

  • Información