MX SS3/SS4 OpenRoads Civil Objects duplicates

Hi all,

I have put together a VBA Macro that imports graphically selected MX strings into OpenRoads via the Context Menu and am trying to have all strings go into a Civil Object named "MX Import".

On each subsequent import a Civil Object is created with an incremented suffix (ie. 1, 2, etc.) which isn't a problem, however, the subsequent civil object contains the elements of the previous. How do I get it to stop doing this?

Here is a snippet of the code:

    CadInputQueue.SendCommand "GEOMETRY civilobject closeactiveobject"
    CadInputQueue.SendCommand "GEOMETRY civilobject setactiveobject"
    CadInputQueue.SendReset
    CadInputQueue.SendCommand "CIVILCMD SETVALUE ObjectName=TQBYACAASQBtAHAAbwByAHQA,False "
    point.X = startPoint.X
    point.Y = startPoint.Y
    point.Z = startPoint.Z
    CadInputQueue.SendDataPoint point, 1

I also have a "closeactiveoject" command at the end of the macro but that still doesn't seem to do it. I'm using MX SS4 MR1 (08.11.09.845).