在EXCEL中插入多个饼图，如何能让这些饼图一样大？

Question

大概有7个饼图，要求是这些个饼要一样大，有数据可以调整么？靠手拉总有些不同的

Answer 1

第一步：选择需要设置的所有图表：
方法1：按住Ctrl键逐个单击需要更改大小的图表；
方法2：按快捷组合键Ctrl+G，弹出的定位对话框中选择“定位条件”按钮，单击选择“对象”（最下方位置）(使用这个组合键前提是：你的工作表中不能有其他的按钮/形状的其他对象，否则也会被选择)。

第二步：在选择的图表上点右键选择“设置对象格式”命令，在弹出的对话框中“大小”选项卡中设置高度和宽度，确定即可。追问

谢谢您，我们做出的图要求是饼基本上和图表框是一样大的，那肯定就需要拖动了，一拖动就不一样大了，现在外面的框都是一样大的，有没有办法让里面的饼也都一样大呢？

追答

　　会用宏吗？插入一个宏命令。操作方法如下：

一、打开需要设置图表的EXCEL工作簿，“工具”菜单下——“宏”命令——“visual basic 编辑器”，打开的工程项目中默认“模块”中粘贴以下代码：

　　Option Explicit

　　Sub Resize()
    Dim i As Integer
    On Error Resume Next
    For i = 1 To ActiveSheet.ChartObjects.Count
        ActiveSheet.ChartObjects(i).Activate
        ActiveChart.ChartArea.Font.Size = 11
        '设置图表中所有字体的字号为11
        With ActiveChart.Parent
            '设置图表的各项参数，如宽、高、上下间隔、左边距
            .Width = 200
            .Height = 140
            .Top = 10 + (i - 1) * 140
            .Left = 150
        End With
        With ActiveChart.PlotArea
            '设置图表绘图区的各项参数，上边距、左边距、宽、高
            .Top = 20 
            .Left = 20
            .Width = 120 ‘这里统一绘图区的宽度，也就是饼的宽度
            .Height = 100 '这里统一绘图区的高度，也就是饼的高度
        End With
    Next i
End Sub

 

二、“文件”菜单——“关闭并返回到microsoft excel”

三、“工具”菜单——“宏”——“宏”，选择这个“Resize”，单击“执行”，即可完成。

Answer 2

1、选中全部饼图，在选项卡中输入高度及宽度。
2、设置对齐，使其均布。

Answer 3

excel饼图也是图形对象，整体选择饼图，格式功能区会显示它的尺寸大小，还有各种对齐命令。这就提示我们，多个饼图是可以象图片对象一样进行操作的。
首先选择一个你希望的大小的饼图，从格式区记住它的长宽尺寸，然后选择所有希望大小相等的饼图，再到格式功能区，输入前面记下的长宽数据，完成后，所有的饼图就都等大笑了。