excelvba直方图箱

我正在使用VBA创建直方图。我在“原始数据”表上有数据。我可以使用数据创建图表，然后使用下面的代码将其剪切并粘贴到我的“摘要”选项卡上

'
' Histogram of Entries
'
Sheets("Raw Data").Select
Range("F" & intFirstRow + 1 & ":F" & intLastRow).Select
ActiveSheet.Shapes.AddChart2(-1, xlHistogram).Select
Selection.Cut
Sheets("Summary").Select
ActiveSheet.Paste
With ActiveSheet.Shapes("Chart 3")
' Reposition the chart
    .IncrementLeft Range("E17").Left
    .IncrementTop Range("E17").Top
End With

我正在努力解决的是，我需要调整箱子的宽度，以便图表以10的间隔显示物品的数量。我可以用非自动化的方式通过

-右键单击图表，然后选择“格式化绘图区域”

-在出现的侧栏中，单击“绘图区域选项”下拉列表并选择“水平轴”

-单击直方图图标，然后打开“轴选项”下拉列表，然后

-点击“箱子宽度”项目并输入“10.0”

---

我试着在做这件事的时候录制宏，但没有得到任何结果。你知道如何使用VBA实现这一点吗？

Excel 2016中的新图表类型（直方图就是其中之一）尚未完全支持VBA，并且并非所有图表属性都暴露于VBA对象模型。这就是为什么您看不到宏记录器返回的任何内容

---

如果您已经使用VBA，您也可以在VBA中生成BIN，使用公式（或VBA）聚合数据，然后绘制标准柱状图

谢谢。我希望“简单的出路”是可行的。不过，这不是很多工作。