class ExcelApp: def init(self, master): self.master = master master.title("Excel App")# 创建工具栏 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_file).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中，在寫入前要判斷文本框中是否存在内容和下拉輸入框是否有值，如果沒有就提醒

您可以参考以下的代码实现：

import openpyxl
from openpyxl.utils import get_column_letter

def save_to_excel(self):
    # 获取当前工作表名
    sheet_name = self.workbook.active.title
    
    # 创建新的excel文件
    new_wb = openpyxl.Workbook()
    new_sheet = new_wb.active
    
    # 获取文本框中的数据
    data = self.textbox.get("1.0", tk.END).strip()
    
    # 判断文本框是否为空
    if data:
        # 将文本框中的数据按列写入新的excel文件
        for i, row in enumerate(data.split("\n")):
            for j, cell in enumerate(row.split("\t")):
                col_letter = get_column_letter(j + 1)
                new_sheet[col_letter + str(i+1)] = cell
    
    # 检查下拉框是否有值
    for child in self.textbox.winfo_children():
        if isinstance(child, tk.ttk.Combobox) and child.get():
            col_letter = get_column_letter(j + 2)
            new_sheet[col_letter + str(i+1)] = child.get()
    
    # 如果文本框和下拉框都为空，则提醒用户
    if not data and not self.textbox.winfo_children():
        messagebox.showwarning("警告", "文本框和下拉框都为空，无法保存！")
    else:
        # 保存新的excel文件
        new_wb.save(sheet_name + ".xlsx")

这个函数会将文本框中的数据和下拉框中的选项按列写入一个新的excel文件，然后保存到当前工作表的同名文件中。如果文本框和下拉框都为空，则会弹出一个警告提示。