使用VBA将PDF文本复制并粘贴到Excel中,并从文本中提取项目编号,交货date和工况大小?

我有一个PDF文件,看起来像这样:

在这里输入图像说明

该文件包含有关供应商交货情况的信息。

我想能够使用vba自动将所有这些复制到excel中。

如果我按ctrl + a和ctrl + c这到excel,它复制并粘贴到一列。

理想情况下,我想分解这些信息,当它被粘贴到Excel中。 并将PO编号,物料编号和数量分成不同列。

此外,我想修剪项目号码并在字符“ – ”之前粘贴数字,例如“000922230 – 0006”将是“000922230”。 然后使用数字“0006”的结束位并将其粘贴到C列(这是我的案例大小)

所以最终的结果应该是这样的:

Column A (PO) Column B (Item No) Column C (Case Size) Column D (Quantity) 041120121601 000922230 6 63 

请有人告诉我这是可能的吗? 我真的很抱歉,我是全新的vba,所以我只能做到我的代码的复制和粘贴到目前为止:

 Sub StartAdobe() Dim AdobeApp As String Dim AdobeFile As String Dim StartAdobe AdobeApp = "C:\Program Files\Adobe\Reader 9.0\Reader\AcroRd32.exe" AdobeFile = "C:\users\richard\desktop\RDS\Richard Pay form.pdf" StartAdobe = Shell("" & AdobeApp & " " & AdobeFile & "", 1) Application.OnTime Now + TimeValue("00:00:05"), "FirstStep" End Sub Private Sub FirstStep() SendKeys ("^a") SendKeys ("^c") Application.OnTime Now + TimeValue("00:00:10"), "SecondStep" End Sub Private Sub SecondStep() AppActivate "Microsoft Excel" Range("A1").Activate SendKeys ("^v") End Sub 

如果有人能指引我正确的方向或帮助我开始,我真的很感激。 还请注意,我的代码需要一个PDF文件path被列出,但是,PDF文件并不总是被保存,所以如果有一种方法来引用开放的PDF文件,而不是这样,这将是更好的。

谢谢