雷達圖又稱蜘蛛圖，是一種顯示二維多元數(shù)據(jù)的圖形方法。圖表上的每個輻條代表一個不同的變量，數(shù)據(jù)點沿著這些輻條繪制。雷達圖尤其適用于比較不同實體在多個標準中的表現(xiàn)。本文將演示如何使用 Spire.XLS for Python （Spire.XLS for Python試用下載 ）通過 Python 在 Excel 中創(chuàng)建雷達圖。

安裝 Spire.XLS for Python

此教程需要 Spire.XLS for Python 和 plum-dispatch v1.7.4。您可以通過以下 pip 命令將它們輕松安裝到 Windows中。

pip install Spire.XLS

Python 在 Excel 中創(chuàng)建標準雷達圖

Spire.XLS for Python 提供了 Worksheet.Charts.Add(ExcelChartType.Radar) 方法，用于在 Excel 工作表中添加標準雷達圖。具體步驟如下：

• 創(chuàng)建 Workbook 類的對象。
• 通過 Workbook.Worksheets[] 屬性獲取指定的工作表。
• 將圖表數(shù)據(jù)添加到指定的單元格并設(shè)置單元格樣式。
• 使用 Worksheet.Charts.Add(ExcelChartType.Radar) 方法在工作表中添加一個簡單的雷達圖。
• 通過 Chart.DataRange 屬性設(shè)置圖表的數(shù)據(jù)范圍。
• 設(shè)置圖表的位置、圖例和標題。
• 使用 Workbook.SaveToFile() 方法保存結(jié)果文件。

from spire.xls import *
from spire.xls.common import *

# 創(chuàng)建Workbook對象
workbook = Workbook()

# 獲取第一張工作表
sheet = workbook.Worksheets[0]

# 在指定單元格中添加數(shù)據(jù)
sheet.Range["A1"].Value = "評分"
sheet.Range["A2"].Value = "溝通能力"
sheet.Range["A3"].Value = "工作經(jīng)驗"
sheet.Range["A4"].Value = "工作效率"
sheet.Range["A5"].Value = "領(lǐng)導(dǎo)能力"
sheet.Range["A6"].Value = "創(chuàng)新能力"
sheet.Range["A7"].Value = "協(xié)作能力"

sheet.Range["B1"].Value = "小李"
sheet.Range["B2"].NumberValue = 4
sheet.Range["B3"].NumberValue = 3
sheet.Range["B4"].NumberValue = 4
sheet.Range["B5"].NumberValue = 3
sheet.Range["B6"].NumberValue = 5
sheet.Range["B7"].NumberValue = 5

sheet.Range["C1"].Value = "小張"
sheet.Range["C2"].NumberValue = 2
sheet.Range["C3"].NumberValue = 5
sheet.Range["C4"].NumberValue = 4
sheet.Range["C5"].NumberValue = 4
sheet.Range["C6"].NumberValue = 3
sheet.Range["C7"].NumberValue = 3

# 設(shè)置字體樣式
sheet.Range["A1:C1"].Style.Font.IsBold = True
sheet.Range["A1:C1"].Style.Font.Size = 11
sheet.Range["A1:C1"].Style.Font.Color = Color.get_White()

# 設(shè)置行高和列寬
sheet.Rows[0].RowHeight = 20
sheet.Range["A1:C7"].Columns[0].ColumnWidth = 15

# 設(shè)置單元格樣式
sheet.Range["A1:C1"].Style.Color = Color.get_DarkBlue()
sheet.Range["A2:C7"].Borders[BordersLineType.EdgeBottom].LineStyle = LineStyleType.Thin
sheet.Range["A2:C7"].Style.Borders[BordersLineType.EdgeBottom].Color = Color.get_DarkBlue()
sheet.Range["B1:C7"].HorizontalAlignment = HorizontalAlignType.Center
sheet.Range["A1:C7"].VerticalAlignment = VerticalAlignType.Center

# 在工作表中添加雷達圖
chart = sheet.Charts.Add(ExcelChartType.Radar)

# 設(shè)置圖標位置
chart.LeftColumn = 4
chart.TopRow = 4
chart.RightColumn = 14
chart.BottomRow = 29

# 設(shè)置圖標的數(shù)據(jù)源
chart.DataRange = sheet.Range["A1:C7"]
chart.SeriesDataFromRange = False

# 設(shè)置圖表標題
chart.ChartTitle = "員工績效考核"
chart.ChartTitleArea.IsBold = True
chart.ChartTitleArea.Size = 14
chart.PlotArea.Fill.Visible = False
chart.Legend.Position = LegendPositionType.Corner

# 保存結(jié)果文件
workbook.SaveToFile("Excel雷達圖.xlsx", ExcelVersion.Version2016)
workbook.Dispose()

填充雷達圖是標準雷達圖的一種變體，不同之處在于每個數(shù)據(jù)點之間的區(qū)域用顏色填充。下面是使用 Python 創(chuàng)建填充雷達圖的步驟：

• 創(chuàng)建 Workbook 類的對象。
• 通過 Workbook.Worksheets[] 屬性獲取指定的工作表。
• 將圖表數(shù)據(jù)添加到指定的單元格并設(shè)置單元格樣式。
• 使用 Worksheet.Charts.Add(ExcelChartType.RadarFilled) 方法在工作表中添加一個填充雷達圖。
• 通過 Chart.DataRange 屬性設(shè)置圖表的數(shù)據(jù)范圍。
• 設(shè)置圖表的位置、圖例和標題。
• 使用 Workbook.SaveToFile() 方法保存結(jié)果文件。

from spire.xls import *
from spire.xls.common import *

# 創(chuàng)建Workbook對象
workbook = Workbook()

# 獲取第一張工作表
sheet = workbook.Worksheets[0]

# 在指定單元格中添加數(shù)據(jù)
sheet.Range["A1"].Value = "評分"
sheet.Range["A2"].Value = "溝通能力"
sheet.Range["A3"].Value = "工作經(jīng)驗"
sheet.Range["A4"].Value = "工作效率"
sheet.Range["A5"].Value = "領(lǐng)導(dǎo)能力"
sheet.Range["A6"].Value = "創(chuàng)新能力"
sheet.Range["A7"].Value = "協(xié)作能力"

sheet.Range["B1"].Value = "小李"
sheet.Range["B2"].NumberValue = 4
sheet.Range["B3"].NumberValue = 3
sheet.Range["B4"].NumberValue = 4
sheet.Range["B5"].NumberValue = 3
sheet.Range["B6"].NumberValue = 5
sheet.Range["B7"].NumberValue = 5

sheet.Range["C1"].Value = "小張"
sheet.Range["C2"].NumberValue = 2
sheet.Range["C3"].NumberValue = 5
sheet.Range["C4"].NumberValue = 4
sheet.Range["C5"].NumberValue = 4
sheet.Range["C6"].NumberValue = 3
sheet.Range["C7"].NumberValue = 3

# 設(shè)置字體樣式
sheet.Range["A1:C1"].Style.Font.IsBold = True
sheet.Range["A1:C1"].Style.Font.Size = 11
sheet.Range["A1:C1"].Style.Font.Color = Color.get_White()

# 設(shè)置行高和列寬
sheet.Rows[0].RowHeight = 20
sheet.Range["A1:C7"].Columns[0].ColumnWidth = 15

# 設(shè)置單元格樣式
sheet.Range["A1:C1"].Style.Color = Color.get_DarkBlue()
sheet.Range["A2:C7"].Borders[BordersLineType.EdgeBottom].LineStyle = LineStyleType.Thin
sheet.Range["A2:C7"].Style.Borders[BordersLineType.EdgeBottom].Color = Color.get_DarkBlue()
sheet.Range["B1:C7"].HorizontalAlignment = HorizontalAlignType.Center
sheet.Range["A1:C7"].VerticalAlignment = VerticalAlignType.Center

# 在工作表中添加填充雷達圖
chart = sheet.Charts.Add(ExcelChartType.RadarFilled)

# 設(shè)置圖標位置
chart.LeftColumn = 4
chart.TopRow = 4
chart.RightColumn = 14
chart.BottomRow = 29

# 設(shè)置圖標的數(shù)據(jù)源
chart.DataRange = sheet.Range["A1:C7"]
chart.SeriesDataFromRange = False

# 設(shè)置圖表標題
chart.ChartTitle = "員工績效考核"
chart.ChartTitleArea.IsBold = True
chart.ChartTitleArea.Size = 14
chart.PlotArea.Fill.Visible = False
chart.Legend.Position = LegendPositionType.Corner

# 保存結(jié)果文件
workbook.SaveToFile("Excel填充雷達圖.xlsx", ExcelVersion.Version2016)
workbook.Dispose()

歡迎下載|體驗更多E-iceblue產(chǎn)品