Hi,

I am new to forum and to VBA coding as well. I manage to get a code for my task thru net but its not complete.
The code works fine ,however i want to add a condition to open multiple PDF file from the folder ,copy the content ,paste the same in word file and save the word file.below is the code,i haven't edited it much ,since i don't know much.Any help to dis will be great and appreciated.

Code i got from net,it does open the PDF file,however i have multiple files ;

Sub OpenPDFPageView()

Dim PDFApp As AcroApp
Dim PDFDoc As AcroAVDoc
Dim PDFPageView As AcroAVPageView
Dim PDFPath As String
Dim DisplayPage As Integer

PDFPath = "C:\Documents and Settings\Ram\My Documents\Datawork RND\2013@4_ 800.pdf"

DisplayPage = 3

Set PDFApp = CreateObject("AcroExch.App")

Set PDFDoc = CreateObject("AcroExch.AVDoc")

'Open the PDF
If PDFDoc.Open(PDFPath, "") = True Then
PDFDoc.BringToFront

'Maximize the document
' Call PDFDoc.Maximize(True)

'Set PDFPageView = PDFDoc.GetAVPageView()

End If

Set PDFApp = Nothing
Set PDFDoc = Nothing

On Error Resume Next

'Show the adobe application
PDFApp.Show

'Set the focus to adobe acrobat pro
AppActivate "Adobe Acrobat Pro"

End Sub

Awaiting reply .thanks in advance