close excel by keyword 根据关键字关闭 excel 窗口 xlwings 方式实现

根据标题关键字关闭 workbook,如果没有打开的 workbook 则退出 excel

xlwings 方式实现 更方便快捷

python 复制代码
def close_excel_by_keyword(keyword):
    if '~$' in keyword:
        return
    app = xw.apps.active
    for workbook in app.books:
        if keyword in workbook.name:
            workbook.close()

file_list = os.listdir(mb51_dir)
    print('file list', file_list)
   
    while any('~$' in x for x in file_list):
        file_list = os.listdir(mb51_dir)
        for file in file_list:
            close_excel_by_keyword(file)
            time.sleep(1)
python 复制代码
import win32com.client
import win32gui

def close_excel_by_keyword(keyword):
    # 获取当前所有窗口的句柄
    hwnds = []
    win32gui.EnumWindows(lambda hwnd, param: param.append(hwnd), hwnds)

    # 遍历窗口句柄,查找包含关键字的 Excel 窗口并关闭
    for hwnd in hwnds:
        text = win32gui.GetWindowText(hwnd)
        if keyword in text:
            excel = win32com.client.Dispatch("Excel.Application")
            try:
                workbooks = excel.Workbooks
                for workbook in workbooks:
                    if keyword in workbook.Name:
                        workbook.Close(False)
            except Exception as e:
                pass

    try:
        excel = win32com.client.GetActiveObject("Excel.Application")
        workbooks = excel.Workbooks
        print(workbooks.Count)
        if workbooks.Count == 0:
            # 如果没有打开的工作簿,关闭 Excel.Application
            excel.Quit()
    except:
        # 如果没有 Excel.Application 实例,不需要关闭
        pass

def main():
    keyword = "tw"  # 替换为你要查找的关键字
    close_excel_by_keyword(keyword)

if __name__ == "__main__":
    main()
相关推荐
青皮桔30 分钟前
CSS实现百分比水柱图
前端·css
影子信息35 分钟前
vue 前端动态导入文件 import.meta.glob
前端·javascript·vue.js
青阳流月36 分钟前
1.vue权衡的艺术
前端·vue.js·开源
样子201840 分钟前
Vue3 之dialog弹框简单制作
前端·javascript·vue.js·前端框架·ecmascript
kevin_水滴石穿41 分钟前
Vue 中报错 TypeError: crypto$2.getRandomValues is not a function
前端·javascript·vue.js
2401_873587821 小时前
Linux常见指令以及权限理解
linux·运维·服务器
Prodigy_kyw2 小时前
VBA初学3----实战(VBA实现Excel转csv)
excel·vba·csv
孤水寒月2 小时前
给自己网站增加一个免费的AI助手,纯HTML
前端·人工智能·html
CoderLiu2 小时前
用这个MCP,只给大模型一个figma链接就能直接导出图片,还能自动压缩上传?
前端·llm·mcp
伍哥的传说2 小时前
鸿蒙系统(HarmonyOS)应用开发之实现电子签名效果
开发语言·前端·华为·harmonyos·鸿蒙·鸿蒙系统