Class: ExcelWps::Chart

Inherits:
Object
  • Object
show all
Defined in:
lib/excel_wps.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.



330
331
332
 
# File 'lib/excel_wps.rb', line 330

def initialize(active)
  @chart = active
end

Instance Method Details

#axes_unit(int) ⇒ Object

设置坐标轴格式, 刻度单位



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

def axes_unit(int)
  @chart.Axes(2).MajorUnit = int
  @chart.Axes(2).MinorUnit = int
end

#axes_x=(name) ⇒ Object

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



365
366
367
368
 
# File 'lib/excel_wps.rb', line 365

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

#axes_y=(name) ⇒ Object

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



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

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

#category_name=(bool) ⇒ Object

标签类别名称开关



414
415
416
417
418
 
# File 'lib/excel_wps.rb', line 414

def category_name=(bool)
  now_table do |n|
    n.ShowCategoryName = bool
  end
end

#chart_work ⇒ Object 



334
335
336
 
# File 'lib/excel_wps.rb', line 334

def chart_work
  @chart
end

#data_label(type = DataLabelsShowLabelAndPercent) ⇒ Object

添加饼图的百分比



392
393
394
395
396
397
398
399
400
401
402
403
404
 
# File 'lib/excel_wps.rb', line 392

def data_label(type=DataLabelsShowLabelAndPercent)

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

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

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

#now_table ⇒ Object

标签选项



339
340
341
342
343
344
345
346
 
# File 'lib/excel_wps.rb', line 339

def now_table
  #@chart.SeriesCollection(n).DataLabels
  num = @chart.SeriesCollection.Count
  num.times do |t|
    t += 1
    yield @chart.SeriesCollection(t).DataLabels
  end
end

#series_name=(bool) ⇒ Object

标签系列名称开关



407
408
409
410
411
 
# File 'lib/excel_wps.rb', line 407

def series_name=(bool)
  now_table do |n|
    n.ShowSeriesName = bool
  end
end

#source=(range) ⇒ Object

这是原数据地址, 以每列数据作为一个系列



355
356
357
 
# File 'lib/excel_wps.rb', line 355

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

#style=(int) ⇒ Object

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



386
387
388
389
 
# File 'lib/excel_wps.rb', line 386

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

#title=(name) ⇒ Object

修改标题



349
350
351
352
 
# File 'lib/excel_wps.rb', line 349

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

#type=(c_type) ⇒ Object

更改图形类型



360
361
362
 
# File 'lib/excel_wps.rb', line 360

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

#value=(bool) ⇒ Object

标签值开关



421
422
423
424
425
426
427
 
# File 'lib/excel_wps.rb', line 421

def value=(bool)
  now_table do |n|
    n.ShowValue = bool
    n.ShowLegendKey = 0 unless bool
    n.Separator = " " unless bool
  end
end