excel怎么设置坐标轴标题对齐和绘区域的大小?

办公党和学生党经常会用EXCEL做很多图，做PPT的时候这些图需要对齐放置，如果每个图裁切的大小不一样，或者绘图区矩形大小不一致，坐标轴标题位置不统一，怎么摆都觉得哪里没有对齐。由于EXCEL强大的数据处理能力和普及使用率，小白还是坚持用EXCEL作图。时间可贵，作为一个外行，我们不需要懂很多，够用即可，下文是小白用Vba简单实现以上功能，将上图修改成下图。与大家一起学习EXCEL绘图，高手请多多指点。

1、建立“个人宏工作簿”：

个人宏工作簿就是一个EXCEL文件，当我们建立了个人宏工作簿以后，每次打开excel文件的时候，它在后台自动打开并且隐藏（可在“视图”中隐藏或者显隐），我们可以把所有的宏都放在“个人宏工作薄”中，这样我们就不用将EXCEL保存成含有宏的文件了。

如图点“开发工具”（没有的话，可以在自定义功能区里面找），点击“录制宏”，弹出“录制宏对话框”在“保存在"下拉菜单选择"个人宏工作簿",点击”确定"，然后点击“停止录制”。第一个宏和个人宏工作簿就完成了。

2、编写宏文件：

打开一个EXCEL文件，点击“开发工具”“VisualBasic"弹出VB界面，在左侧的“工程资源管理器”树中（如果没有，请在VB界面点”视图“查找），我们看到了两个项目，第一个项目“personal.xlsb"就是自动打开的隐藏的个人宏工作簿，双击”模块1“，刚才录制的宏就在这里面，觉得没用可以删除，在模块1中，我们写下以下代码（注释见图片中），会点英语的应该都能看懂。这样我们的宏建好了，以后任意EXCEL都可以用了。

Sub 宏1绘图区和坐标轴设置()      

    Dim HalfHeight, HalfWidth, OffsetTop, OffsetLeft, ChartHeight As Double    

     ActiveChart.ChartArea.Select

     ActiveChart.ChartArea.Width = 455

     ActiveChart.ChartArea.Height = 348

     ChartHeight = ActiveChart.ChartArea.Height

     ActiveChart.PlotArea.Select

     Selection.InsideLeft = 45

     Selection.InsideTop = 10

     Selection.InsideWidth = 400

     Selection.InsideHeight = 300

     OffsetLeft = Selection.InsideLeft