Klasördeki PDF dosyaların tümünü açmadan yazdırmak

Merhaba,

Klasör içindeki PDF dosyaların tümünü, ilgili ürünü onay kutusu ile seçtiğimde yazdır butonuna bastığımda yazdırılsın istiyorum.

Ürün adı ile klasör adı aynıdır. Klasörün içindeki dosya adları ürün adıyla aynı fakat sıra numaralı olacaktır. İlgili ürün imalat raporlarını PDF olarak her bir ürün adına ait klasörün içine atacağım. PDF dosyalar açılmadan yazdırılsın istiyorum Bunu nasıl yapabilirim.

Yardımcı olacak arkadaşlarıma şimdiden teşekkür ederim

örneğinizi 2003 olarak da ekleyebilirseniz,incelemek mümkün olur,kullananlar açısından da.

iyi çalışmalar.
saygılar.

Dim path As String

path = CurrentProject.path & "\PDF Dosyalar\" & Me.UrunAdi & "\" & Me.UrunAdi & ".pdf"

CreateObject("Shell.Application").Namespace(0).ParseName(path).InvokeVerb ("Print")

ozan hocam olmadı kodlar

sitenizde güzel bir örnek buldum dosyaları açmadan yazdır konusunda onu indirdim gerek kalmadı ancak bu örnek üzerinde seçerek çıktı sayısı girerek yazdırmak istiyorum bunun için yeni bir konu açtım

saygılar

Klasördeki PDF dosyaların tümünü açmadan yazdırmak

F.Ç

atoz112

ozanakkaya

F.Ç