㈠ 在Excel中怎樣用VBA批量統計PDF頁數,大神們,幫幫忙,萬分感謝。
試試下面的代碼,在網上找的:
Subpdfpage()
DimAcroAppAsAcrobat.CAcroApp
DimnumPagesAsInteger
DimPD1AsAcrobat.CAcroPDDoc
SetAcroApp=CreateObject("AcroExch.App")
SetPD1=CreateObject("AcroExch.PDDoc")
DimmydialogAsFileDialog
DimiAsInteger,sFileAsString
Setmydialog=Application.FileDialog(msoFileDialogFilePicker)
Withmydialog
.Filters.Clear'清除所有文件篩選器中的項目
.Filters.Add"所有PDF文件","*.pdf",1'增加篩選器的項目為所有pdf文件
.AllowMultiSelect=True'允許多項選擇
.Show
If.SelectedItems.Count=0Then
MsgBox"沒有選擇任何文件!",vbExclamation+vbOKOnly,"提示"
ExitSub
EndIf
Fori=1To.SelectedItems.Count
sFile=.SelectedItems(i)
Range("a"&i)=sFile
PD1.Open(sFile)
Range("b"&i)=PD1.GetNumPages()
PD1.Close
Next
MsgBox"文件處理完畢!"&vbCrLf&vbCrLf&"共處理了"&.SelectedItems.Count&"個文件。",vbInformation+vbOKOnly,"提示"
EndWith
AcroApp.Exit
SetAcroApp=Nothing
SetPD1=Nothing
EndSub
㈡ 怎麼查看多個PDF文件的頁數,不打開pdf文件的情況下,求這樣的軟體
這個PageAID是基於 Adobe acrobat開發的,批量統計PDF以及office文檔頁數的,無需打開PDF文件即可獲得頁數,效率超高,還能把結果輸出到Excel中
㈢ 如何一次性統計多個文檔的總頁數
WinXP系統的,用這個!切換到編輯文件摘要功能卡,添加文件列表,然後單擊導出文件詳情按鈕,如下圖所示,選擇導出項目為頁數。
㈣ 如何批量讀取文件(PDF或word)頁數並自動顯示在文件名稱中
可以使用 億彩文檔批量處理大師來實現。
步驟如下:
1.下載大師並安裝
㈤ 多個PDF統計頁數
這個統計頁數很簡單的吧,樓主的「多個」應該至少大於10個吧,手動統計是比較費時費力的工作,這個PageAID完美解決頁碼統計問題
㈥ 如何快速統計許多個pdf文件的頁數
無需打開文件,直接統計大量PDF文檔的頁數,用起來非常方便,還能把統計結果輸出
㈦ 急求:多個pdf文件頁數統計工具
好東西要收藏啊,著急用的時候著急還找不到
完美實現Office三大格式和PDF的頁碼統計問題
㈧ PDF文件總頁數怎樣才能批量的計算啊
可以參考下面方法計算:
1、首先雙擊打開PDF應用。
㈨ 求個可以統計word、pdf、excel等文件頁數的軟體或方法
很少有能統計所有格式的,但僅僅是給定格式,比如docx,pdf,xlsx,這三種,是可以用一定的工具或代碼實現的。