Pdf to excel

KUYJS

New Member
Joined
Sep 3, 2018
Messages
43
Hi

I get invoice on pdf in image format and to do my work i need all those figures of these invoices on excel. Is there a way to do this using excel vba.

I heard about one note whixh can actually help but have no idea how to copy pdf content to one note and then one note content to excel.

Please suggest if it's doable?

Thanks,
Tarun
 

Excel Facts

What do {} around a formula in the formula bar mean?
{Formula} means the formula was entered using Ctrl+Shift+Enter signifying an old-style array formula.
This will get you started ... at least.

You'll need to download the free Adobe Reader from the Adobe website. Verify the location of the reader on your machine and make the necessary edit to the
path in the macro code.

Code:
Option Explicit


Sub StartAdobe()
Dim AdobeApp As String
Dim AdobeFile As String
Dim StartAdobe
Dim intChoice As Integer
Dim strPath As String


'only allow the user to select one file
Application.FileDialog(msoFileDialogOpen).AllowMultiSelect = False


'make the file dialog visible to the user
intChoice = Application.FileDialog(msoFileDialogOpen).Show


'determine what choice the user made
    If intChoice <> 0 Then
    
        'get the file path selected by the user
        AdobeFile = Application.FileDialog(msoFileDialogOpen).SelectedItems(1)
        
        'verify location of Adobe Reader on your machine.
        AdobeApp = "C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe"
         
        StartAdobe = Shell("" & AdobeApp & " " & AdobeFile & "", 1)
         
        Application.Wait (Now + TimeValue("0:00:01"))
        
        SendKeys ("^a")
        SendKeys ("^c")
         
        Application.Wait (Now + TimeValue("0:00:01"))
        
        SendKeys ("%fx")
        
        AppActivate "Microsoft Excel"
        
        ThisWorkbook.Activate
        
        Sheets(1).Activate
        
        Range("A1").Activate
        
        SendKeys ("^v")
    
    End If


End Sub
 
Upvote 0

Forum statistics

Threads
1,224,823
Messages
6,181,181
Members
453,022
Latest member
Mohamed Magdi Tawfiq Emam

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top