摘要： 向Excel工作表中手动插入图形对象是十分方便的，如果需要向工作表中插入大量图形，或是对绘制的图形对象大小和位置有很准确的要求，用手工绘制的方法就不太方便了。此时可以通过VBA程序来进行图形对象的绘制。本文以在工作表中绘制一个三角形为例来介绍向Excel工作表中添加图形的方法。
1、启动Excel并打开Visual Basic编辑器，在工程资源管理器中插入一个模块，在模块的“代码”窗口中输入程序代码，如图1所示。具体的程序代码如下所示：
Sub DrawTr()
Dim triArray(1 To 4,1 To 2)As Single
triArray(1,1)=25
triArray(1,2)=100
triArray(2,1)=100
triArray(2,2)=150
triArray(3,1)=150
triArray(3,2)=50
triArray(4,1)=25
怎样使用Excel中组合框控件
怎样使用Excel中组合框控件 组合框是一个Excel表格中的下拉列表框,用户可以在获得的列表中选择项目,选择的项目将出现在上方的文本框中.当需要选择的项目较多时,使用选项按钮来进行选择就不合适了,此时可以使用"组合框"控件来进行选择.本文以使用"组合框"控件选择Excel图表中需要显示的数据为例来介绍"组合框"控件的具体使用方法. 1.启动Excel并打开工作表,将B1:G1单元格区域中的内容复制到B8:G8单元格区域中.在A9单元格中输入公式
triArray(4,2)=100
Worksheets(1).Shapes.AddPolyline triArray
Worksheets(1).Shapes(1).Fill.ForeColor.RGB=RGB(15,100,255)
End Sub
图1 创建模块并输入程序代码
提示
在VBA中，使用Shapes对象的AddPolyline方法能够创建一个不封闭或封闭的多边形，该方法将能够返回一个代表新的连续线段或多边形的Shape对象。该方法的语法格式如下所示：
表达式AddPolyline(SafeArrayOfPoints)
这里，表达式是一个代表Shapes对象的变量，该方法的SafeArrayOfPoints参数是一个必选参数，其是用于指定多边形顶点的坐标对所组成的数组，坐标对指的是一对数值，该数值表示点的X和Y坐标。
2、按F5键运行该段程序代码，在Excel工作表中将插入一个蓝色的三角形，如图2所示。
图2 在工作表中插入三角形
如何在Excel图表中添加次坐标轴
如何在Excel图表中添加次坐标轴 Excel图表应用十分广泛,主次坐标轴也是图表制作中的常客,因为2种数据的不同对比,无法在一个坐标轴上体现,那么次坐标轴就显得尤为重要,能更加清晰直观的显示.那么我们看下具体是怎么实现的呢? 方法/步骤 首先打开所要建立图表的excel工作表,数据与自己的表格数据对照设计. 全选数据然后点击插入柱形图; 右键红色柱形图(即同比增长数据)选择'设置数字系列格式' 选择次坐标轴 右边出现次坐标轴,由于图表感觉不美观,右键红色图表选择'更改系列图表类型' 选择折线图中
