EXCEL表格使用VBA编程设置绘图区尺寸

最新推荐文章于 2024-08-08 10:27:05 发布

黄菜鸟

最新推荐文章于 2024-08-08 10:27:05 发布

阅读量2.2k

点赞数

分类专栏：论文写作文章标签：经验分享

本文链接：https://blog.csdn.net/sinat_36154268/article/details/115407359

版权

论文写作专栏收录该内容

9 篇文章

订阅专栏

本文介绍了如何在Excel中通过VBA代码精确调整图表绘图区的大小，以确保在制作论文或PPT时，各个子图的绘图区保持一致美观。步骤包括打开VBA编辑器，插入代码，设置图表宽度、高度以及绘图区的宽度和位置，从而实现绘图区的统一调整。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

EXCEL表格只能够修改整个图表的大小，但是无法调整绘图区的大小。而在写论文，做ppt的时候经常会展示多个子图，为了美观，通常要求各个子图的绘图区要大小一致。本文介绍了一种方法来实现绘图区大小的精确调整。

1，首先打开excel表格，右击选择查看代码（若没有的，需要去文件->选项->自定义功能区勾选开发"开发工具"）。

2，选择worksheet，选择befordoubleclick。

将以下代码复制进去。

Set myDocument = ActiveSheet
For Each S In myDocument.ChartObjects
'MsgBox (S.Name)
    S.Activate
    ActiveChart.ChartArea.Select
    S.Width = 400  //设置整个图片大小
    S.Height = 190
    ActiveChart.PlotArea.Select
    Selection.Width = 375  //设置绘图区大小
    Selection.Top = 9
    Selection.Height = 125
Next S