卡饭网 > excel > 正文

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

来源:本站整理 作者:梦在深巷 时间:2016-06-04 06:40:50

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

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

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

  个人宏工作簿就是一个EXCEL文件,当我们建立了个人宏工作簿以后,每次打开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

  OffsetTop = Selection.InsideTop

  HalfWidth = Selection.InsideWidth 2

  HalfHeight = Selection.InsideHeight 2

  ActiveChart.Axes(xlValue).AxisTitle.Select

  Selection.Left = 0

  Selection.Top = ((HalfHeight + OffsetTop) - (Selection.Height 2))

  ActiveChart.Axes(xlCategory).AxisTitle.Select

  Selection.Left = ((HalfWidth + OffsetLeft) - (Selection.Width 2))

  Selection.Top = ChartHeight - Selection.Height - 3

  End Sub

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

相关推荐