VBA 批量调整excel图表格式 线条粗细.doc

《VBA 批量调整excel图表格式 线条粗细.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、Excel画图时默认的线条和标记比较大，写论文时使用起来经常要把线条和标记调小才好看。如果图表比较多，图里的系列也比较多的话，一条一条的设置起来会很麻烦，这里给出了一个宏，使用方法是选中图表后运行宏即可。Subzoom()''zoom宏''ActiveSheet.ChartObjects("图表1").Activate'1可以改为循环整数DimiAsIntegerFori=1ToActiveChart.SeriesCollection.CountActiveChart.SeriesCollection(i).SelectSelection.

2、MarkerSize=3'设置标记大小为3WithSelection.Format.Line.Visible=msoTrue.Weight=1.25'设置线条粗细为1.25EndWithNextEndSub可以根据自己的需求更改标记的大小和线条的粗细。当然如果需要对所有图表做这种更改，可以找出图表个数，对ActiveSheet.ChartObjects("图表i").Activate进行外围循环即可。