When I record a macro and I open corridor objects and change the templatedrop I get the following code.
When I run the code and change the templatedrop ORD only opens the corridor objects window, no further change. (the highlited text doesn't run)
It looks like ORD doesn't reconize the keyin "CIVILMSTN SETPROPERTY"?
Who can help me to edit the corridor objects??
thanks!
Sub BmrCor_ch_template() Dim startPoint As Point3d Dim point As Point3d, point2 As Point3d Dim lngTemp As Long Dim oMessage As CadInputMessage' Send a keyin that can be a command string CadInputQueue.SendKeyin "CORRIDOR OBJECTS OPEN "' Coordinates are in master units startPoint.X = "132446,79725245997542515397" startPoint.Y = "550248,14571063639596104622" startPoint.Z = "0,00000000000000000000"' Send a data point to the current command point.X = startPoint.X point.Y = startPoint.Y point.Z = startPoint.Z CadInputQueue.SendDataPoint point, 1 CadInputQueue.SendKeyin "CIVILMSTN SETPROPERTY TemplateDrop_Presentation.TemplateName=othertemplate" CadInputQueue.SendKeyin "DMSG UPDATEDIALOG -400" CommandState.StartDefaultCommand End Sub
Hi Andre, Just came across the same problem. Do you have any update on this?
Hi Sadaf,
Unfortunately I haven't got an update yet :-(. Do you maybe have some suggestions for a solution?
I think it would be great if this wil works! :-D