vay tiền online, bất động sản khuyến mãi giảm giá cực sốc căn hộ VIP 3 phòng ngủ chỉ có tại taichinh4u.net

Ứng Dụng VBA Excel | Bài 06 chuyển file PDF sang file Excel



Link tải file thực hành:
Đăng ký Để nhận video mới:
Facebook hỗ trợ:

Bài giảng này mình sẽ hướng dẫn các bạn một trong những ứng dụng VBA Excel là chuyển file từ PDF sang file Excel.

vay tiền online, bất động sản khuyến mãi giảm giá cực sốc căn hộ VIP 3 phòng ngủ chỉ có tại taichinh4u.net
vay tiền online, bất động sản khuyến mãi giảm giá cực sốc căn hộ VIP 3 phòng ngủ chỉ có tại taichinh4u.net

Chúc các bạn học tốt Excel!!!
#Gaexcel #ExcelChicken #CungHocExcel #ExcelCoBan #ExcelNangCao

Tag: chuyển đổi file pdf sang file excel, gà excel, gà excel vba, gà.excel,ứng dụng vba,ứng dụng vba trong excel,ứng dụng của vba trong excel, chuyển file pdf sang excel, chuyen file pdf sang file excel, chuyển từ file pdf sang file excel, cách chuyển từ file pdf sang file excel, vba excel, vba excel cơ bản, lập trình vba trong excel, học excel online, vba trong excel, hoc vba excel online

Xem thêm: https://taichinh4u.net/category/internet

Nguồn: https://taichinh4u.net

Rate this post

Originally posted 2021-03-21 20:35:32.

vay tiền online, bất động sản khuyến mãi giảm giá cực sốc căn hộ VIP 3 phòng ngủ chỉ có tại taichinh4u.net

21 bình luận

  1. Cám ơn bạn Gà Excel. Cách làm này có chuyển được sang Word không, nếu được thì sửa code như thế nào. nhờ bạn Gà Excel chỉ giúp

  2. Anh ơi anh có thể hướng dẫn xuất excel sang pdf được không anh, hiện tại em có file excel em cần xuất sang pdf để lưu (phiếu xuất kho công cụ hàng ngày)

  3. a ơi cho em hỏi bình thường thì mở PDF trong word thì mở như thế nào anh, ý là không dùng VBA thì chuyển 1 file PDF sang Excel thì làm thế nào ạ?

  4. Anh cho em hỏi trong File Word có các số liệu vd: 75.500 nhưng khi chạy qua Excel chỉ còn 75.5 mình có các nào khác phục lỗi này không anh

  5. Bạn Gà excel ơi, mình bắt chước cấu trúc của bạn, để làm pdf chuyển qua word nhưng bị báo lỗi phong chữ. Bạn có thể hướng dẫn mình hướng xử lý không. Mình đã ráp câu lệnh thế này. Không biết có sai chỗ nào không. Thank you.

    Sub pdf2word()

    Dim pdf_path As String 'duong dan file pdf

    Dim word_path As String 'duong dan file word

    'Cac bien de thao tac voi file va folder

    Dim fso As New FileSystemObject

    Dim Fo As Folder

    Dim Fi As File

    'Cac bien lien quan den word

    Dim wa As Object

    Dim doc As Object

    'Duong dan pdf va word

    pdf_path = ThisWorkbook.Sheets(1).Cells(11, 4).Value

    word_path = ThisWorkbook.Sheets(1).Cells(12, 4).Value

    Set Fo = fso.GetFolder(pdf_path)

    'Mo ung dung word ra

    Set wa = CreateObject("word.application")

    wa.Visible = True

    For Each Fi In Fo.Files

    'Buoc 1: mo file pdf trong word

    Set doc = wa.Documents.Open(Fi.Path, False, Format:="PDF File")

    'Buoc 2: Paste du lieu vu copy

    doc.SaveAs (word_path & "" & Replace(Fi.Name, ".pdf", ".doc"))

    doc.Close False

    Next

    wa.Quit

    MsgBox "Hoan thanh"

  6. Mình tải file về test thử nhưng dòng Set wa = CreateObject("work.application").Value báo bị Debug, mình kiểm tra đúng cú pháp rồi mà không hiểu tại sao, những dòng khai báo biến mình cũng sao chép đầy đủ, bạn biết lỗi nằm chỗ nào thì giúp mình với nhé

  7. Chao ban, cam on ban da chia se ve bai hoc tren rat hay. Nhung neu chung ta can chuyen file dang Notepad sang excel thi ko biet ban co the lam video de share cho moi nguoi cung xem ko. Cam on ban!

  8. Cảm ơn anh nhièu, tool rất hay. Anh ơi, có cách nào tự động hoá việc tải file (pdf) khi truy cập web bằng cách click một đường dẫn hyperlink không anh? Nếu được anh chia sẻ nha.

Để lại một phản hồi

Thư điện tử của bạn sẽ không được hiện thị công khai.


*