| [备忘]VBA操作图表相关 | ||
| 添加日期：2009/8/7 16:36:02 | 快速返回 返回列表 | 阅读5267次 |
ActiveSheet.ChartObjects.Add(Left:=235, Width:=260.25, Top:=356, Height:=141) 创建新的嵌入图表。返回 ChartObject 对象。 expression.Add(Left, Top, Width, Height) expression?? 必需。该表达式返回一个 ChartObjects 对象。 Left, Top?? Double 类型，必需。以磅为单位给出新对象的初始坐标，该坐标是相对于工作表上单元格 A1 的左上角或图表的左上角的坐标。 Width, Height?? Double 类型，必需。以磅为单位给出新对象的初始大小。 2，否则，需要先激活图表，通过下标或名字 ActiveSheet.ChartObjects("这里是你图表的名称").Activate ActiveSheet.ChartObjects(1).Activate 3.得到所有图表 For i = 1 To ActiveSheet.ChartObjects.Count MsgBox ActiveSheet.ChartObjects(i).Name Next ActiveSheet.ChartObjects(1).Activate ActiveSheet.ChartObjects("Chart 1").Activate ================================================================ VBA图表剖析 一、图表各元素在VBA中的表达方式 1、图表区 VBA名称：ChartArea 2、绘图区 VBA名称：PlotArea 调整绘图区的大小以及在图表中的位置，指定绘图区的Top、Left、Height和Width属性。 3、数据系列 VBA名称：Series 指定给定系列语法：ChatObject.SeriesCollection(Index)，其中Index是数字范围，从1开始，最大值是图表中系列的数量或系列名称的数量。 4、图表轴 VBA名称：Axis 指定给定轴的简单语法：ChatObject.Axes(Type)，其中Type指定轴的Excel VBA常量。 辅助轴 语法：ChatObject.Axes(Type，AxisGroup)。 5、网格线 VBA名称：HasMajorGridlines和HasMinorGridlines 根据需要可以选择显示或者不显示主要网格线或次要网格线。若显示网格线，可以设置线条的图案(颜色、线宽、线条样式等等)。 6、数据标签 VBA名称：DataLabels和DataLabel (1)图表中所有系列的所有点显示特定类型的数据标签或不显示数据标签： ActiveChart.ApplyDataLabels Type:=xlDataLabelsShowNone (2)特定系列显示数值(Y)作为数据标签： With ActiveChart.SeriesCollection(“Xdata”) .HasDataLabels=True .ApplyDataLabels Type:=xlDataLabelsShowValue End With (3)特定的点在它的数据标签中显示文字 With ActiveChart.SeriesCollection(“Xdata”).Points(1) .HasDataLabels=True .DataLabel.Text=”MyLabel” End With (4)将公式放置在某个系列上的某特定点的数据标签中(在公式中需使用RC样式) With ActiveChart.SeriesCollection(“Xdata”).point(1) .HasDataLabels=True .DataLabel.Text=”Sheet1.R1C1” End With 7、图表标题、图例和数据表 VBA名称：ChartTitle、HasLegend和HasDataTable 可以用VBA指定图表标题和图例的位置、文字和文字格式。 8、趋势线和误差线 VBA名称：Trendlines和ErrorBar |
||
| 评论 COMMENTS | |
| 没有评论 No Comments. |
