Ik heb deze code in vba gemaakt maar moet dit nu omzetten naar javascript. kan iemand mij misschien op weg helpen want met javascript heb ik nog niet gewerkt.
Dim CommObj As Object
Set comm_obj = CreateObject("Magics.ApplicationMagics")
Select Case comm_obj.GetLabelName(j)
Case "partname"
a = comm_obj.GetPartLabel(0)
Case "Width"
b = comm_obj.GetPartLabel(1)
Case "Depth"
c = comm_obj.GetPartLabel(2)
Case "Height"
d = comm_obj.GetPartLabel(3)
Set comm_obj = Nothing
Dim CommObj As Object
Set comm_obj = CreateObject("Magics.ApplicationMagics")
Select Case comm_obj.GetLabelName(j)
Case "partname"
a = comm_obj.GetPartLabel(0)
Case "Width"
b = comm_obj.GetPartLabel(1)
Case "Depth"
c = comm_obj.GetPartLabel(2)
Case "Height"
d = comm_obj.GetPartLabel(3)
Set comm_obj = Nothing