rohan its working fine ichecked it again . if you are copying this code to another workbook make sure you select
tools -> refrence-> microsoft word Sub copypasteusingadobe() Dim i, z As Long For i = 1 To 1 Dim a As String Dim b As String Dim c b = Range("a" & i).Value a = "C:\Program Files\Adobe\Reader 9.0\Reader\AcroRd32.exe" c = Shell("" & a & " " & b & "", 1) Application.Wait Now + TimeValue("00:00:05") SendKeys ("^a") SendKeys ("^c") Application.Wait Now + TimeValue("00:00:05") Dim appWord As Word.Application Dim WordDoc As Word.Document Set appWord = CreateObject("Word.Application") Set WordDoc = appWord.Documents.Add appWord.Visible = True 'appWord.Selection.PasteSpecial Link:=False, DataType:=wdPasteText, _ Placement:=wdInLine, DisplayAsIcon:=False appWord.Documents.Add.Content.Paste With appWord .ActiveDocument.SaveAs Filename:=ThisWorkbook.Path & "\pdf_ " & i & ".doc", FileFormat:=wdocument .ActiveWindow.Close .Quit End With Set appWord = Nothing Set WordDoc = Nothing b = "" Next i End Sub On Thu, Jan 20, 2011 at 10:36 AM, Rohan Young <rohan.j...@gmail.com> wrote: > Dear Ashish Ji, > > the following error facing by me too : > > SendKeys ("^a") > SendKeys ("^c") > Application.Wait Now + TimeValue("00:00:05") > Dim appWord As Word.Application > > Set appWord = CreateObject("Word.Application") > > > appWord.Visible = True > > > appWord.Documents.Add.Content.PasteSpecial Link:=False, _ > Placement:=wdInLine, DisplayAsIcon:=False, DataType:=wdPasteText > > > With appWord > > Regards > > ROHAN > > > On Wed, Jan 19, 2011 at 8:10 PM, ashish koul <koul.ash...@gmail.com>wrote: > >> >> >> hi i tried its working fine at my place attaching the working macro again >> >> 19, 2011 at 5:57 PM, Prathima R <prathima....@gmail.com> wrote: >> >>> >>> >>> Hi , >>> >>> >>> >>> I tried this macro but I am unable find the pdf files and when I click on >>> file name button however if I still proceed by giving the path where pdf Is >>> located macro is running fine >>> >>> But it is not saving the word doc . error message is popped up stating >>> already in use thought I closed and used it. Same status. >>> >>> >>> >>> Please help me as early as possible. >>> >>> >>> >>> Thanks, >>> >>> Prathima >>> >>> >>> On Thu, Jan 6, 2011 at 3:15 PM, SHAH DARSHIL <darshil.m...@gmail.com>wrote: >>> >>>> You can use this site. >>>> >>>> Www.zamar.com <http://www.zamar.com/> >>>> >>>> On Thu, Jan 6, 2011 at 12:48 AM, Mariappan Kulasekaran < >>>> marimac...@gmail.com> wrote: >>>> >>>>> Hi Friends, >>>>> >>>>> As a part of my official activities, I will get incoming document as an >>>>> Ordinary PDF format. I have to covert this to a word document before I >>>>> processing it. >>>>> >>>>> Now I am Doing the below steps for convertion for each files. >>>>> >>>>> 1. Open the PDF File. >>>>> 2. Select all content using Cntrl+A >>>>> 3. Copy the content Using Cntrl+C >>>>> 4. Paste the content in a blank word document. >>>>> 5. Save the document as rtf format. >>>>> >>>>> Now I am expecting to do this in a macro or other systematic way. It >>>>> would be more helpful if anyone give me a solution for this activities. >>>>> This >>>>> will bring my work stress a lot. >>>>> >>>>> Reason for looking VBA Code or Macro: >>>>> >>>>> 1. I dont have Fine Reader package in my office. >>>>> 2. I dont have privilage to download any Free PDF to word converter >>>>> from google search. >>>>> 3. I will get 30 to 100+ Documents in a day. >>>>> >>>>> I am expecting emergency solution for the above. >>>>> >>>>> Thanks in Advance. >>>>> >>>>> By, >>>>> >>>>> R. K. Maariappan >>>>> marimac...@gmail.com >>>>> >>>>> -- >>>>> >>>>> ---------------------------------------------------------------------------------- >>>>> Some important links for excel users: >>>>> 1. Follow us on TWITTER for tips tricks and links : >>>>> http://twitter.com/exceldailytip >>>>> 2. Join our LinkedIN group @ >>>>> http://www.linkedin.com/groups?gid=1871310 >>>>> 3. Excel tutorials at http://www.excel-macros.blogspot.com >>>>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com >>>>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com >>>>> >>>>> To post to this group, send email to excel-macros@googlegroups.com >>>>> >>>>> <><><><><><><><><><><><><><><><><><><><><><> >>>>> Like our page on facebook , Just follow below link >>>>> >>>>> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts >>>>> >>>> >>>> >>>> >>>> -- >>>> Regards, >>>> Darshil Shah. >>>> darshil.m...@gmail.com >>>> +91-9725503879 >>>> >>>> >>>> -- >>>> >>>> ---------------------------------------------------------------------------------- >>>> Some important links for excel users: >>>> 1. Follow us on TWITTER for tips tricks and links : >>>> http://twitter.com/exceldailytip >>>> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 >>>> 3. Excel tutorials at http://www.excel-macros.blogspot.com >>>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com >>>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com >>>> >>>> To post to this group, send email to excel-macros@googlegroups.com >>>> >>>> <><><><><><><><><><><><><><><><><><><><><><> >>>> Like our page on facebook , Just follow below link >>>> >>>> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts >>>> >>> >>> -- >>> >>> ---------------------------------------------------------------------------------- >>> Some important links for excel users: >>> 1. Follow us on TWITTER for tips tricks and links : >>> http://twitter.com/exceldailytip >>> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 >>> 3. Excel tutorials at http://www.excel-macros.blogspot.com >>> 4. Learn VBA Macros at http://www.quickvba.blogspot.com >>> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com >>> >>> To post to this group, send email to excel-macros@googlegroups.com >>> >>> <><><><><><><><><><><><><><><><><><><><><><> >>> Like our page on facebook , Just follow below link >>> http://www.facebook.com/discussexcel >>> >> >> >> >> -- >> *Regards* >> * * >> *Ashish Koul* >> *akoul*.*blogspot*.com <http://akoul.blogspot.com/> >> *akoul*.wordpress.com <http://akoul.wordpress.com/> >> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830> >> >> >> P Before printing, think about the environment. >> >> >> -- >> >> ---------------------------------------------------------------------------------- >> Some important links for excel users: >> 1. Follow us on TWITTER for tips tricks and links : >> http://twitter.com/exceldailytip >> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 >> 3. Excel tutorials at http://www.excel-macros.blogspot.com >> 4. Learn VBA Macros at http://www.quickvba.blogspot.com >> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com >> >> To post to this group, send email to excel-macros@googlegroups.com >> >> <><><><><><><><><><><><><><><><><><><><><><> >> Like our page on facebook , Just follow below link >> http://www.facebook.com/discussexcel >> > > -- > > ---------------------------------------------------------------------------------- > Some important links for excel users: > 1. Follow us on TWITTER for tips tricks and links : > http://twitter.com/exceldailytip > 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 > 3. Excel tutorials at http://www.excel-macros.blogspot.com > 4. Learn VBA Macros at http://www.quickvba.blogspot.com > 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com > > To post to this group, send email to excel-macros@googlegroups.com > > <><><><><><><><><><><><><><><><><><><><><><> > Like our page on facebook , Just follow below link > http://www.facebook.com/discussexcel > -- *Regards* * * *Ashish Koul* *akoul*.*blogspot*.com <http://akoul.blogspot.com/> *akoul*.wordpress.com <http://akoul.wordpress.com/> My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830> P Before printing, think about the environment. -- ---------------------------------------------------------------------------------- Some important links for excel users: 1. Follow us on TWITTER for tips tricks and links : http://twitter.com/exceldailytip 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310 3. Excel tutorials at http://www.excel-macros.blogspot.com 4. Learn VBA Macros at http://www.quickvba.blogspot.com 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com <><><><><><><><><><><><><><><><><><><><><><> Like our page on facebook , Just follow below link http://www.facebook.com/discussexcel