ChartObject.Placement procedure builder

ChartObject.Placement (Excel)

Returns or sets a Variant value, containing an XlPlacement constant, that represents the way the xlplacement is attached to the cells below it.

xlFreeFloating - Object is free floating, xlMove - Object is moved with the cells, xlMoveAndSize - Object is moved and sized with the cells.
ActiveSheet.ChartObjects(1).Placement = xlFreeFloating