Xin Code chuyển PDF vào Excel (1 người xem)

[GCQ]

Nhờ anh em diễn đàn cho xin Code chuyển file PDF (file đính kèm) vào Excel.
Chân thành cảm ơn.

 

[tranhungdao12a3]

Nhờ anh em diễn đàn cho xin Code chuyển file PDF (file đính kèm) vào Excel.
Chân thành cảm ơn.

Tôi không dùng VBA, dùng thử Power Query:

let
    Source = Pdf.Tables(File.Contents("C:\Users\Admin\Downloads\3456.pdf"), [Implementation="1.3"]),Page1 = Source{[Id="Page001"]}[Data],
    RP_Value = Table.ReplaceValue(Page1,".","",Replacer.ReplaceText,{"Column5", "Column6", "Column7"})
in
    RP_Value