直方图及正太分布制图宏中图表属性操作

jiang1232

针对一组或多组数据进行频率统计，制作频率统计直方图，并叠加正太分布曲线是在数据分析中常用的制图，附件针对数据表中多列数据利用宏完成直方图组合频率的正太分布图。
设计思路：将数据表中的数据读入数组，同时从参数表中读取统计频率左右限制值，根据步长对数据出现频率统计，在宏中调用normdist函数计算分布概率，最终根据数据统计结果数组成图。因为一次想统计多组数据，所以采用循环成图。由于不太会图形操作，采用将录制宏嵌入for循环中成图，宏程序已经能够运行通过，先存着一下问题求助：

1.在形成宏中想对次坐标轴进行字体限制，如设置黑体加粗等，在宏中如何设计选择次坐标轴。录制宏中出现如下：
ActiveSheet.ChartObjects("图表 3").Activate
    ActiveChart.Axes(xlValue, xlSecondary).Select
实际宏运行中这个图表3是随着运行次数变化的，不能出现在宏中。所以在宏中第一句应该如何写？
2.在我写的宏中其实是有图标题的，当不加载正太分布部分代码标题可以出现，加了后却出现不了了，请问怎么改。
3.嵌入循环成图代码中是从宏录制后直接拷贝过去的，ActiveChart.SeriesCollection(2).Name 总担心这样的（2）或者（1）会不会影响宏的多次运行，没办法就在打开test表的时候全部清空图表保证每次运行都会生成（1）（2）对象。有点笨。。
4.对次坐标轴操作中，
ActiveChart.Axes(xlValue, xlSecondary).Select
'    With Selection.Format.TextFrame2.TextRange.Font
'        .BaselineOffset = 0
'        .Bold = msoTrue
'        .Italic = msoFalse
'        .Name = "黑体"
'    End With
宏中选择次坐标轴，用变量确定最大最小值可以运行通，但修改字体等却无法通过，报错，我注释掉了，大家可以试试。

我以前学习的Fortran语言，写宏中有很多F语言影子，由于我们分析数据量巨大，一般超过1w行，想做程序优化提高运行速度，不知道大家有没有建议。我理解将数据读入数组后，数组在内存中进行操作可能会比表操作要快些，不知对不对。。。新手，请不要笑话。

宏运行没什么问题，可使用，希望大家能在我的基础上完善，作为一个小工具提供给需要的朋友。谢谢

jiang1232

希望不要沉底