打开带密码的 word excel 增加 vbs 打开

import win32com.client
word = win32com.client.Dispatch("Word.Application")


file_path = r"C:\Users\password.docx"
file_path2 = r"C:\Users\password2.docx"
password = "123"
# xlwb = word.Documents.Open(file_path, False, True, None, password)

file_list = [file_path, file_path2]

for file in file_list:
    xlwb = word.Documents.Open(file, False, True, None, password)

打开 excel

from xlrd import *
import win32com.client
import csv
import sys

xlApp = win32com.client.Dispatch("Excel.Application")

xlwb = xlApp.Workbooks.Open(filename, False, True, None, password)

vbs 实现

Dim ObjWD,ObjXL
Set ObjWD = CreateObject("Word.Application")
ObjWD.Visible = true
Set ObjXL = CreateObject("Excel.Application")
ObjXL.Visible = true

password = "123"
ObjWD.Documents.Open "d:\121.docx", , , , password & ""
ObjWD.Documents.Open "d:\122.docx", , , , password & ""
ObjXL.Workbooks.Open "d:\123.xlsx", , , , password & ""

参考
https://stackoverflow.com/questions/19450837/how-to-open-a-password-protected-excel-file-using-python

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值