鱼C论坛

 找回密码
 立即注册
查看: 945|回复: 4

关于向exce表格中插入列表的问题

[复制链接]
发表于 2020-5-8 21:47:00 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
  1. import tkinter as tk
  2. from tkinter import *
  3. from openpyxl import load_workbook
  4. import datetime as tm
  5. import os
  6. import xlrd
  7. import xlwt
  8. win = tk.Tk()
  9. win.title("管理系统")
  10. win.geometry("800x700")
  11. var1 = tk.StringVar()
  12. l = tk.Label(win,bg="yellow",width=4,textvariable=var1)
  13. l.pack()
  14. def pringt_selection():
  15.     value1 = lb.get(lb.curselection())
  16.     value = value1[:-5]


  17.     var1.set(value)
  18.     print(value)
  19.     workbook = load_workbook("D:\\例子\\%s.xlsx" % (value))
  20.     sheet = workbook.active
  21.     cell = sheet["A1"]
  22.     cell.value = "haha"
  23.     workbook.save("D:\\例子\\%s.xlsx" % (value))

  24. b1 = tk.Button(win,text="111",width=15,height=2,command=pringt_selection)
  25. b1.pack()

  26. var2=tk.StringVar()
  27. #var2.set((11,22,33,44))

  28. lb=tk.Listbox(win,listvariable=var2)
  29. for i in os.listdir("D:\\例子\"):
  30.     lb.insert("end",i)
  31. lb.pack()

  32. win.mainloop()
复制代码


按照这样的代码实现了向特定excell表格中插入内容



  1. import tkinter as tk
  2. from tkinter import *
  3. from openpyxl import load_workbook
  4. import datetime as tm
  5. import os
  6. import xlrd
  7. import xlwt
  8. win = tk.Tk()
  9. win.title("管理系统")
  10. win.geometry("800x700")
  11. var1 = tk.StringVar()
  12. l = tk.Label(win,bg="yellow",width=4,textvariable=var1)
  13. l.pack()
  14. def pringt_selection():
  15.     value1 = lb.get(lb.curselection())
  16.     value = value1[:-5]


  17.     var1.set(value)
  18.     print(value)
  19.     workbook = load_workbook("D:\\例子\\%s.xlsx" % (value))
  20.     sheet = workbook.active
  21.     data =["时间","地点","人物"]
  22.     for i in data:
  23.         sheet.append(i)
  24.     workbook.save("D:\\例子\\%s.xlsx" % (value))

  25. b1 = tk.Button(win,text="111",width=15,height=2,command=pringt_selection)
  26. b1.pack()

  27. var2=tk.StringVar()
  28. #var2.set((11,22,33,44))

  29. lb=tk.Listbox(win,listvariable=var2)
  30. for i in os.listdir("D:\\例子\"):
  31.     lb.insert("end",i)
  32. lb.pack()

  33. win.mainloop()
复制代码




但是将写入的内容换成列表后就会报错,
workbook = load_workbook("D:\\例子\\%s.xlsx" % (value))
    sheet = workbook.active
    data =["时间","地点","人物"]
    for i in data:
        sheet.append(i)
    workbook.save("D:\\例子\\%s.xlsx" % (value))
插入列表的错误在哪里,求正确的写法
小甲鱼最新课程 -> https://ilovefishc.com
回复

使用道具 举报

发表于 2020-5-8 23:29:53 | 显示全部楼层
不需要用for循环来添加列表的每一项。
直接sheet.append(data)
就可以了

小甲鱼最新课程 -> https://ilovefishc.com
回复 支持 1 反对 0

使用道具 举报

 楼主| 发表于 2020-5-9 12:40:34 | 显示全部楼层
谢了 ,原来画蛇添足了
小甲鱼最新课程 -> https://ilovefishc.com
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-5-9 12:41:22 | 显示全部楼层
rsj0315 发表于 2020-5-8 23:29
不需要用for循环来添加列表的每一项。
直接sheet.append(data)
就可以了

怎么不能给你最佳答案啊?
小甲鱼最新课程 -> https://ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2020-5-10 21:01:23 | 显示全部楼层
zhudaming120 发表于 2020-5-9 12:41
怎么不能给你最佳答案啊?

不清楚
小甲鱼最新课程 -> https://ilovefishc.com
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2025-6-19 01:30

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表