使用Python实现写入多类型数据至Excel文件

pip install spire.xls.free

from spire.xls import *

workbook = Workbook()
sheet = workbook.Worksheets.get_Item(0)

# 写入文本
sheet.Range["B2"].Value = "Hello, Python & Excel!"

# 应用格式
sheet.Range.AutoFitColumns()
sheet.Range.BorderAround(LineStyleType.Medium, Color.get_MediumBlue())
sheet.Range.Style.Color = Color.get_LightGray()

# 保存并释放资源
workbook.SaveToFile("HelloWorld.xlsx", ExcelVersion.Version2016)
workbook.Dispose()

sheet.Range["A1"].Value = "产品名称"
sheet.Range["B1"].Value = "销售额"
sheet.Range["A2"].Value = "笔记本电脑"
sheet.Range["B2"].NumberValue = 12000
sheet.Range["A3"].Value = "智能手机"
sheet.Range["B3"].NumberValue = 8500.75

from spire.xls.common import *
import datetime

# 写入当前 UTC 时间
sheet.Range["B1"].DateTimeValue = DateTime.get_UtcNow()

# 写入指定日期
sheet.Range["B2"].DateTimeValue = DateTime.Parse("2023-05-01")

# 转换 Python datetime 对象
py_time = datetime.datetime(2023, 5, 1, 10, 30)
time_str = py_time.strftime("%Y-%m-%d %H:%M:%S")
sheet.Range["B3"].DateTimeValue = DateTime.Parse(time_str)

# 设置显示格式
sheet.Range["B1"].Style.NumberFormat = "yyyy-mm-dd hh:mm:ss"

sheet.Range.AutoFitColumns()

sheet.Range["B1"].BooleanValue = True
sheet.Range["B2"].BooleanValue = False

header = ["ID", "姓名", "年龄"]
data = [[1, "张三", 30], [2, "李四", 25]]

# 写入标题（按行）
sheet.InsertArray(header, 1, 1, False)

# 逐行写入数据
for i, row in enumerate(data, start=2):
    for j, value in enumerate(row, start=1):
        sheet.Range[i, j].Value = str(value)

products = [
    {"ID": "P001", "名称": "键盘", "价格": 199},
    {"ID": "P002", "名称": "鼠标", "价格": 99}
]

if products:
    headers = list(products[0].keys())
    sheet.InsertArray(headers, 1, 1, False)
    
    for r_idx, item in enumerate(products, start=2):
        values = [item[k] for k in headers]
        # 当前版本需逐单元格赋值
        for c_idx, val in enumerate(values, start=1):
            sheet.Range[r_idx, c_idx].Value = str(val)

sheet.Range["A1"].NumberValue = 10
sheet.Range["A2"].NumberValue = 20
sheet.Range["B1"].Formula = "=SUM(A1:A2)"
sheet.Range["B2"].Formula = "=AVERAGE(A1:A2)"

sheet.Pictures.Add(3, 1, "logo.png")
# 可选：调整尺寸与偏移
# pic = sheet.Pictures.Add(3, 1, "logo.png")
# pic.Width, pic.Height = 100, 50

# 外部链接
cell = sheet.Range[7, 1]
cell.Text = "Python 官网"
link = sheet.HyperLinks.Add(cell)
link.Address = "https://www.python.org"

# 内部链接
detail_sheet = workbook.Worksheets.Add("详情页")
target_cell = detail_sheet.Range["A3"]
target_cell.Text = "跳转至详情页"
internal_link = sheet.HyperLinks.Add(sheet.Range[8, 1])
internal_link.Address = f"{detail_sheet.Name}!A1"