class ExcelApp: def init(self, master): self.master = master master.title("Excel App") # 创建菜单栏 menubar = tk.Menu(master) master.config(menu=menubar) # 创建文件菜单及其子菜单 filemenu = tk.Menu(menubar, tearoff=0) filemenu.add_command(label="PA綫點檢表", command=lambda: self.load_excel("D:\點檢系統存放資料夾\點檢明細\點檢内容明細.xlsx")) filemenu.add_command(label="Excel 2", command=lambda: self.load_excel("excel2.xlsx")) filemenu.add_command(label="Excel 3", command=lambda: self.load_excel("excel3.xlsx")) menubar.add_cascade(label="文件", menu=filemenu) # 创建帮助菜单及其子菜单 helpmenu = tk.Menu(menubar, tearoff=0) helpmenu.add_command(label="关于", command=self.show_about) menubar.add_cascade(label="帮助", menu=helpmenu) # 创建工具栏 toolbar = tk.Frame(master, height=30) tk.Button(toolbar, text="打开", command=self.open_file).pack(side=tk.LEFT, padx=2, pady=2) tk.Button(toolbar, text="保存", command=self.save_to_excel).pack(side=tk.LEFT, padx=2, pady=2) toolbar.pack(side=tk.TOP, fill=tk.X)# 创建文本框 text_frame = tk.Frame(self.panel_right) text_frame.pack(side=tk.TOP, fill=tk.BOTH, expand=True) self.textbox = tk.Text(text_frame) self.textbox.pack(side=tk.TOP, fill=tk.BOTH, expand=True) def show_sheet(self, sheet_name): self.textbox.tag_configure("left", justify="left") sheet = self.workbook[sheet_name] rows = sheet.max_row # 清空文本框 self.textbox.delete(1.0, tk.END) # 添加表名并设置居中标签 self.textbox.insert(tk.END, sheet_name + ":\n", "center") # 显示工作表内容,并在相应数据后面添加下拉输入框 for row in sheet.iter_rows(values_only=True): for i, cell in enumerate(row): line = str(cell) + "\t" if i == 0: # 在第一列数据后面添加下拉输入框 combobox = tk.ttk.Combobox(self.textbox, values=["下拉选项1", "下拉选项2", "下拉选项3"]) combobox.pack(side=tk.TOP, padx=10, pady=5) self.textbox.window_create(tk.END, window=combobox) self.textbox.insert(tk.END, line, "left") self.textbox.insert(tk.END, "\n") # 设置居中标签的样式 self.textbox.tag_configure("center", justify="center", font=("Arial", 14, "bold"))儅用戶點擊保存時根據第二個函數將文本框中所有數據和下拉輸入框中的值按列循環寫入一個excel中保存的函數代碼
时间: 2023-11-01 18:06:20 浏览: 213
CreateObject(Excel.Application)报错解决方法-win10.rar
3星 · 编辑精心推荐
以下是将文本框中所有数据和下拉输入框中的值按列循环写入一个excel中保存的函数代码:
```
def save_to_excel(self):
# 获取当前工作表名
sheet_name = self.workbook.sheetnames[self.sheet_index]
# 获取当前工作表对象
sheet = self.workbook[sheet_name]
# 获取当前工作表最大行数
rows = sheet.max_row
# 获取当前工作表最大列数
cols = sheet.max_column
# 循环写入数据
for row_index in range(1, rows+1):
for col_index in range(1, cols+1):
# 获取当前单元格对象
cell = sheet.cell(row=row_index, column=col_index)
# 如果当前单元格的第一列(即下拉输入框所在列),则写入下拉框的值
if col_index == 1:
# 获取下拉框的值
value = self.textbox.window_cget(f"{row_index}.{col_index}", "value")
# 将下拉框的值写入单元格
cell.value = value
else:
# 获取文本框中的值
value = self.textbox.get(f"{row_index}.{col_index-1}", f"{row_index}.{col_index-1}")
# 将文本框中的值写入单元格
cell.value = value
# 保存excel文件
self.workbook.save(self.filename)
```
阅读全文