从PDF复制和粘贴时读取数字时出现宏问题

Question

复制了PDF中的此选择

https://i.stack.imgur.com/646hD.png

它被粘贴到excel的一栏中

https://i.stack.imgur.com/gNUZL.png

https://i.stack.imgur.com/6gzcm.png

在第I列中使用文本可以将日期和文本分开而没有任何问题，只需要估算美元金额，但这仍然比必须输入日期和文本更好 https://i.stack.imgur.com/SG189.png

我的问题是我创建了此宏以自动执行文本到列的处理

    ActiveCell.Select
ActiveSheet.PasteSpecial Format:="Text", Link:=False, DisplayAsIcon:= _
    False
Selection.TextToColumns Destination:=ActiveCell, DataType:=xlFixedWidth, _
    FieldInfo:=Array(Array(0, 1), Array(10, 1), Array(32, 1)), TrailingMinusNumbers _
    :=True
ActiveCell.CurrentRegion.Select

结束子

但是不幸的是，某些日期没有作为数字处理。仅当我运行宏时才会出现此问题。

https://i.stack.imgur.com/stMU7.png

但是，奇怪的是，当我分别从编辑栏中突出显示每个日期并按Enter时，它将选择内容转换为数字，即日期。

https://i.stack.imgur.com/OiGtE.png

https://i.stack.imgur.com/dwbPK.png

这里的问题到底是什么？有人能找到简单的解决方案吗？

我尝试将pdf放入word文档中，但是当我将它从word复制并粘贴到excel时会生成“ OLE_LINK”。

再次感谢。