Code to split and rename files

[gubertu]

Hi all,

I have a PDF with 20 pages and I want to split it into 20 different pages. I wonder if, appart from the first petition, could it be possible to rename those files that are going to be splitted, based on a list of names that should be in an Excel file.

Any ideas?

Thanks in advance for your help!

 

[John_w]

This can be done with a VBA macro calling the Acrobat API, installed with Adobe Acrobat Pro, not the free Reader.

 

[gubertu]

Hi John,

could you please send me the macro?

Thanks!

 

[John_w]

Is Acrobat Pro installed and API available? Run this macro to find out:

Public Sub Check_Acrobat_Installation()
    Dim PDDoc As Object
    Set PDDoc = Nothing
    On Error Resume Next
    Set PDDoc = CreateObject("AcroExch.PDDoc")
    On Error GoTo 0
    If Not PDDoc Is Nothing Then
        MsgBox "Acrobat API is available"
    Else
        MsgBox "Acrobat API is not available"
    End If
End Sub

 

[gubertu]

Thanks John and sorry for my late reply!

I will try this macro and sure it will work.

Thanks!