Class: ExcelOffice::Chart

Inherits:
Object
  • Object
show all
Defined in:
lib/excel_office.rb

Overview

图表

Constant Summary collapse

ColumnClustered =

图形类型

51
ColumnStacked =

簇状柱形图

52
Doughnut =

堆积柱状图

-4120           # 圆环图
Line =

圆环图

4
Pie =

折线图

5
BarClustered =

饼图

57
DataLabelsShowLabel =

标签数据

4
DataLabelsShowLabelAndPercent =

数据点所属的分类

5
DataLabelsShowPercent =

占比百分比以及所属分类,仅饼图

3
DataLabelsShowValue =

百分比, 仅饼图

2

Instance Method Summary collapse

Constructor Details

#initialize(active) ⇒ Chart

Returns a new instance of Chart.



352
353
354
 
# File 'lib/excel_office.rb', line 352

def initialize(active)
  @chart = active
end

Instance Method Details

#axes_x=(name) ⇒ Object

设置X轴名称, 只用于条形图



377
378
379
380
 
# File 'lib/excel_office.rb', line 377

def axes_x=(name)
  @chart.Axes(1,1).HasTitle = true
  @chart.Axes(1,1).AxisTitle.Characters.Text = name
end

#axes_y=(name) ⇒ Object

设置Y轴名称, 只用于条形图



383
384
385
386
 
# File 'lib/excel_office.rb', line 383

def axes_y=(name)
  @chart.Axes(2,1).HasTitle = true
  @chart.Axes(2,1).AxisTitle.Characters.Text = name
end

#chart_work ⇒ Object 



356
357
358
 
# File 'lib/excel_office.rb', line 356

def chart_work
  @chart
end

#data_label(type = DataLabelsShowLabelAndPercent) ⇒ Object

添加饼图的百分比



398
399
400
401
402
403
404
405
406
407
408
409
410
 
# File 'lib/excel_office.rb', line 398

def data_label(type=DataLabelsShowLabelAndPercent)

  # 应用标签选项
  @chart.ApplyDataLabels(type)

  # 取消标签选项的系列名称
  now = @chart.SeriesCollection(1).DataLabels
  now.ShowSeriesName = false

  # 将图例放到右边
  now = @chart.Legend
  now.Position = -4152
end

#source=(range) ⇒ Object

这是原数据地址, 按列生成数据



367
368
369
 
# File 'lib/excel_office.rb', line 367

def source=(range)
  @chart.SetSourceData(range, 2)
end

#style=(int) ⇒ Object

修改样式通过录制宏可以查看样式编号条形图中203 比较好看饼图中 251, 254 比较好看



392
393
394
395
 
# File 'lib/excel_office.rb', line 392

def style=(int)
  @chart.ChartStyle = int
  data_label
end

#title=(name) ⇒ Object

修改标题



361
362
363
364
 
# File 'lib/excel_office.rb', line 361

def title=(name)
  @chart.HasTitle = true
  @chart.ChartTitle.Characters.Text = name
end

#type=(c_type) ⇒ Object

更改图形类型



372
373
374
 
# File 'lib/excel_office.rb', line 372

def type=(c_type)
  @chart.ChartType = c_type
end