1.雙擊執(zhí)行程序，并輸入要檢查的目錄（包含子目錄下所有xlsx,xls）

創(chuàng)新互聯(lián)是專業(yè)的繁昌網(wǎng)站建設(shè)公司，繁昌接單;提供網(wǎng)站設(shè)計、做網(wǎng)站,網(wǎng)頁設(shè)計,網(wǎng)站設(shè)計,建網(wǎng)站,PHP網(wǎng)站建設(shè)等專業(yè)做網(wǎng)站服務(wù);采用PHP框架,可快速的進行繁昌網(wǎng)站開發(fā)網(wǎng)頁制作和功能擴展;專業(yè)做搜索引擎喜愛的網(wǎng)站,專業(yè)的做網(wǎng)站團隊,希望更多企業(yè)前來合作!

2.如有檢查到excel中有插圖，程序輸出文件seekfile_result.txt，并顯示插圖所在文件  sheet表及圖所在位置。

import os
import win32com.client
import xlrd

def run_fast_scandir(dir, key1, key2):    # dir: str, ext: list    搜索文件
subfolders, files = [], []
for f in os.scandir(dir):
if f.is_dir():
subfolders.append(f.path)
if f.is_file():
if key1.lower() in f.name.lower() or key2.lower() in f.name.lower():
files.append(f.path)

for dir in list(subfolders):
    sf, f = run_fast_scandir(dir, key1, key2)
    subfolders.extend(sf)
    files.extend(f)
return subfolders, files

def get_xls_sheets(xlsfile):  # 獲取文件中的sheet表名
xls = xlrd.open_workbook(xlsfile, on_demand=True)
return xls.sheet_names()

def check_pic(xlsfile, sheet): #檢查Sheet中是否有圖
x = win32com.client.Dispatch("Excel.Application")
wb = x.Workbooks.Open(xlsfile)
ws = wb.Sheets(sheet)
for k in ws.Shapes:
result_file.writelines(xlsfile + "   "+sheet+"    ")
result_file.writelines(k.TopLeftCell.Address + "\n")
wb = x.WorkBooks.Close()

if name== "main":
seek_path = input("Input search path (like: d:\test):")
subfolders,files = run_fast_scandir(seek_path, "xlsx", "xls")   #"xlsx","xls"為要查詢的擴展名
i = -1
result_file = open("seekfile_result.txt", "a+")
for f in files:
i += 1
xls_sheets = get_xls_sheets(files[i])
for xls_sheet in xls_sheets:
check_pic(files[i], xls_sheet)
result_file.close()

當前標題：如何用python檢查Excel文件中是否含有插圖?
網(wǎng)站URL：http://www.aaarwkj.com/article46/gipieg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供移動網(wǎng)站建設(shè)、電子商務(wù)、App開發(fā)、網(wǎng)站內(nèi)鏈、動態(tài)網(wǎng)站、品牌網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)