Excel vba 直方图 bin

Question

我正在使用 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 为间隔显示项目数。我可以通过非自动化方式执行此操作

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

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

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

-单击“Bin Width”项目并输入“10.0”。

我尝试在执行此操作时录制宏，但我什么也没得到。知道如何使用 VBA 做到这一点吗？

Answer 1

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

如果您已经使用 VBA，您也可以在 VBA 中生成您的 bin，使用公式(或 VBA)聚合数据，然后绘制标准柱形图。