有没有什么好方法可以检查pdf文件是否与word文档相同？

Question

有一个问题，我使用vba将word文档打印到pdf文件，但pdf文件有时与word不同。

实施例

  

1. pdf文件页面与word文档页面不同。

     

    

Word文档是10页。

         

PDF文件是9页。

  

     

2.Word Document只会将一半打印到pdf。

     

    

word文档的最后一页可能是200个单词，但pdf文件只有120个单词。

  

我有办法检查这个问题。

1.查看页面。

2.检查最后十个单词是否相同。

但是存在一个问题，即“≦”这样的特殊符号无法被vba读取，并且无法被Acrobat API读取。

任何想法都能解决它？

Answer 1

而不是＆＃34;≦＆＃34;使用＆＃34;＆lt; =＆＃34;。 如果你有 Acrobat.tlb 引用，那么页数就像是

Dim oPapp As Acrobat.AcroApp
Dim oPDDoc As Acrobat.AcroPDDoc
Dim docPages as Long
Set oPapp = CreateObject("AcroExch.App")
Set oPDDoc = CreateObject("AcroExch.PDDoc")
oPDDoc.Open ("C:\test.pdf")
docPages = oPDDoc.numPages