Excel一键实现所选区域创建图表

      基于VBA代码和控件一键实现图表的建立，可以年夜幅度提高工作效率。本教程以一键将所选区域生当作柱状图为例。

工具/原料

• Excel

方式/步骤

1. 1

   以下列数据为例。

   
2. 2

   绘制节制按钮，本教程以插入一个外形为例。

   
3. 3

   选中外形，右键菜单，选择指定宏。

   
4. 4

   单击新建按钮。

   
5. 5

   此时会跳转到VBA窗口。

   
6. 6

   在模块中复制粘贴以下代码：

   Sub 矩形1_Click()

   Dim rng As Range

   Set rng = Selection

       rng.Select

       ActiveSheet.Shapes.AddChart2(201, xlColumnClustered).Select

   End Sub

   
7. 7

   封闭VBA窗口，回到Excel界面。

   
8. 8

   选择数据区域，点击按钮即可生当作图表。

   

注重事项

• 若是对您有点帮忙，请撑持一下，感谢！