In hàng loạt file pdf (lệnh ngân hàng được tải về từ hệ thống mail của ngân hàng)

[Dinh Hong Nhung]

Chào cả nhà GPE
Em muốn in hàng loạt file pdf, những file này được tải từ mail tự động của ngân hàng về máy
Vì khi tải về gặp trường hợp:
những file pdf chứa 2 trang, nhưng 1 trang có chứa nội dung cần lấy và 1 trang trống, nên
mỗi lần chọn lệnh in em phải mở ra từng cái để chọn trang in
Vì vậy em muốn các file pdf này khi in chỉ in nhưng cái mình chọn ,loại bỏ trang trống
Em xin gửi kèm file, để nhờ cả nhà viết code hoặc chỉ cách giúp em ạ
Em cảm ơn mọi người ạ

 

[befaint]

những file pdf chứa 2 trang, nhưng 1 trang có chứa nội dung cần lấy và 1 trang trống,

File nào trang 2 cũng đều có chữ.

Định nghĩa trang trống của mình là gì?

 

[Dinh Hong Nhung]

File nào trang 2 cũng đều có chữ.

Định nghĩa trang trống của mình là gì?

File pdf của mình tối đa có 2 trang, mình chỉ cần in trang đầu tiên
Mong được bạn giúp đỡ

 

[befaint]

File pdf của mình tối đa có 2 trang, mình chỉ cần in trang đầu tiên

Đơn giản thế hay hơn, chỉ cần nêu: In hàng loạt file PDF, và chỉ in trang đầu.

Có thể chọn cách này: Ngắt lấy trang 1 của các files PDF, ghép thành 1 file rồi in. In 1 lệnh 1 file sẽ cho tốc độ in nhanh hơn là in nhiều lệnh nhiều files.
Cái này phải lập trình công cụ, không có ngay được.

 

[dinhduy]

Mặc định Windows chỉ cho phép in tối đa 15 file pdf/lần in và in toàn bộ trang của File.
Hôm trước có bạn viết CODE in hàng loạt File PDF luôn và in toàn bộ trang của File.

 

[Dinh Hong Nhung]

Mặc định Windows chỉ cho phép in tối đa 15 file pdf/lần in và in toàn bộ trang của File.
Hôm trước có bạn viết CODE in hàng loạt File PDF luôn và in toàn bộ trang của File.

Bạn có thể cho mình skype của bạn không, mình từng thấy bài của bạn cũng hỏi giống bài của mình, nhưng
mình không chạy được đoạn code của người viết

 

[dinhduy]

Bạn có thể cho mình skype của bạn không, mình từng thấy bài của bạn cũng hỏi giống bài của mình, nhưng
mình không chạy được đoạn code của người viết

gửi lại đoạn CODE bạn dùng thử xem nha

Option Explicit
#If VBA7 Then
    Public Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As LongPtr, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPtr
#Else
    Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
#End If

Sub PrintFiles()
Dim oFile As Object, I As Long, oPath As String
With Application.FileDialog(msoFileDialogFolderPicker)
    If Not .Show Then Exit Sub
    oPath = .SelectedItems(1)
    With CreateObject("Scripting.FileSystemObject")
        For Each oFile In .GetFolder(oPath).Files
            If .GetExtensionName(oFile.Name) = "pdf" Then
                ShellExecute Application.hwnd, "print", oFile.Path, 0&, 0&, 0&
                I = I + 1
            End If
        Next
    End With
End With
MsgBox "Da in " & I & " file Pdf"
End Sub

 

[Dinh Hong Nhung]

bạn ơi, có thể coi giúp mình. Mình đã cài cái add in vô máy rùi, nhưng mà không biết cách sử dụng add in này
Rất mong nhận được sự giúp đỡ từ bạn

 

[hiv174]

File pdf của mình tối đa có 2 trang, mình chỉ cần in trang đầu tiên
Mong được bạn giúp đỡ

Nếu File PDF chỉ có 2 trang thì bác chỉ cần combine tất cả rồi in trang lẻ là xong mà. Em chưa hiểu ý nghĩa trong addin bác chỉ giúp vì em thử nó toàn in vùng mình chọn trong excel và chưa thấy lấy đường dẫn file DPF ở đâu bác ah

 

[dinhduy]

bạn ơi, có thể coi giúp mình. Mình đã cài cái add in vô máy rùi, nhưng mà không biết cách sử dụng add in này
Rất mong nhận được sự giúp đỡ từ bạn

Add-in chỉ để dùng in File excel hàng loạt thôi (bảng lương - hợp đồng), mình nhầm rồi.
Bạn chép đoạn CODE VBA vào model chạy bình thường, mình vừa test xong.
Bạn cần ultra view mình hướng dẫn cho, nhắn tin cá nhân nha

 

[Dinh Hong Nhung]

mình không đủ bài để nhắn tin riêng, bạn có zalo hay skype không? cho mình xin được không?

 

[dinhduy]

mình không đủ bài để nhắn tin riêng, bạn có zalo hay skype không? cho mình xin được không?

Đã xử lý cho bạn ấy xong !