如何使图表/形状垂直自由浮动，而不是水平浮动

Question

有没有办法使用xlfreefloating函数，但只能将图形放在一个方向而不是另一个方向？我有一个宏，将我的图形定位在一定范围的单元格之间。我希望它保持y方向的自由浮动而不是x方向。因此，如果图形位于某些数据单元格的右侧，并且我调整单元格并使它们在x方向上更长，我希望图形遵循。但如果我在y方向调整它们，我希望它们保持不变。谢谢！

Answer 1

我自己发现了如何做到这一点：

执行此操作的一种方法是在操作单元格后手动激活图表，然后根据需要将其放置在左侧或右侧。在创建，定位和操作单元格后，使用以下代码：

Sub MoveCharts()

ActiveSheet.ChartObjects("Chart 7").Activate
With ActiveChart.Parent
.Left = Range("N2").Left
End With

End Sub