chartobjects.add的坑

wangcrazy

Set ab = Range("a7:g13") '生成图表的位置


Set bbb = ActiveSheet.ChartObjects.Add(0, 0, 0, 0)
bbb.Chart.ChartType = xlColumnClustered '柱形图
bbb.Chart.SetSourceData Source:=Sheets("Sheet2").Range("A1:B5") '数据源
With bbb
.Top = ab.Top
.Left = ab.Left
.Width = ab.Width
.Height = ab.Height网上抄来的一段固定图表位置的代码，跑一下没发现问题。等到需要图表顶头的时候有问题了，总是没法到第一行的高度。试来试去发现Add(0, 0, 0, 0) 最后2位不能都为0， 会导致top为一个固定数值，而且还是只读的改不了。
底层原理是什么？是bug吗？

紫色海水

可以查看微软官方文档
一参二参决定chart的位置，三参四参决定chart的大小
其中一参、三参是必须的