默认保存位置
在上述 VBA 脚本中:
- 饼图的位置:
- 饼图默认从第 1 行开始,向右依次排列。
- 每个饼图的左上角由 Left参数确定:Left:=200 * (col - 6)。- 200 * (col - 6)表示从第 G 列(列号 7)开始,每一列饼图向右偏移 200 像素。
 
- 高度和宽度均为 200 像素(可以调整)。
 
- 饼图会保存在哪个工作表:
- 脚本中指定了工作表 Set ws = ThisWorkbook.Sheets(1),饼图会插入到第 1 个工作表。
- 如果需要插入到其他工作表,可以将 Sheets(1)替换为目标工作表的名称,例如:Sheets("数据表")。
 
- 脚本中指定了工作表 
调整饼图位置
如果您希望更清晰地排列饼图,可以调整代码中的 Left 和 Top 参数,例如:
Set chartObj = ws.ChartObjects.Add(Left:=10 + 300 * (col - 7), Width:=250, Top:=50, Height:=250)
- Left控制饼图在水平方向上的位置。
- Top控制饼图在垂直方向上的位置。
- 在这个例子中,每个饼图的宽度为 250 像素,每一列饼图水平间隔 300 像素,首列(G 列)从 Left=10开始。
工作完成后的保存方式
- 保存 Excel 文件:
- 执行完脚本后,生成的饼图会直接保存到 Excel 文件中。
- 点击 文件 > 保存 或按 Ctrl + S,以保存工作簿及生成的图表。
 
- 导出图表(可选):
- 如果需要将饼图导出为单独的图片,可以进一步编写 VBA 代码导出每个图表。
 
如需进一步帮助调整饼图位置或功能,随时告诉我! 😊
 
								 
 
 
 
 
 
  
 
															




 
								 
					 
					 
															 
															