Programlama
Visual Basic for Applications (VBA), uygulamaların dinamik görevleri gerçekleştirmesini sağlamak için Microsoft Office ile kullanılan programlama dilidir; bunlardan biri PDF dosyalarını açmak ve yazdırmaktır. Bu görevi gerçekleştirmek için, VBA dili ve Microsoft Office programlarının her sürümüyle birlikte gelen VBA düzenleyicisi hakkında temel bilgilere sahip olmanız gerekir. Bu kod, herhangi bir Microsoft Office uygulaması için kullanılabilir.
Aşama 1
Kodun girilmesini istediğiniz Microsoft Office uygulamasında VBA düzenleyicisini açın. Microsoft Office 2003 veya önceki bir uygulamada "Dosya" > "Araçlar" > "Makrolar" > "Visual Basic Editor" üzerine tıklayın. Microsoft Office'in 2007 sürümünde "Geliştirici sekmesi" > "Visual Basic"e tıklayın.
Günün Videosu
Adım 2
Kodu eklemek istediğiniz kod penceresinde herhangi bir yeri tıklayın.
Aşama 3
PDF dosyasını açmak için kodu ekleyin. Kodunuz şöyle görünmelidir:
Sub OpenPDF() Dim strPDFFileName As String 'Açmak istediğiniz PDF dosyasına tam dosya adını eklemek için düzenleyin strPDFFileName = "C:\examplefile.pdf" 'Sıradaki işlev dosyanın açık olup olmadığını kontrol eder Dosya Kilitli Değilse (strPDFFileName) Ardından 'Yanlış döndürürse, PDF dosyasını Belgeler'i açmaya devam edin. strPDFFileName'i açın) End If End Sub
Bu kodu kopyalayıp kod pencerenize yapıştırın. Kodun değiştirmeniz gereken tek kısmı, açmak istediğiniz PDF dosyasının tam yoludur. Bu nedenle, "C:\examplefile.pdf" dosyasını kendi dosya yolunuz ve adınızla değiştirin.
4. Adım
PDF dosyasını yazdırmak için kodu ekleyin. Baskı kodu:
Sub PrintPDF (string olarak strPDFFileName) Dim sAdobeReader as String 'Bu, bilgisayarınızdaki Adobe Reader veya Acrobat uygulamasının tam yoludur sAdobeReader = "C:\Program Files\Adobe\Acrobat 6.0\Reader\AcroRd32.exe" RetVal = Kabuk (sAdobeReader & "/P" & Chr (34) & sStrPDFFileName & Chr (34), 0) Alt Alt
Bu kodun değiştirilmesi gereken tek kısmı, Adobe Reader, Acrobat veya bilgisayarınızdaki herhangi bir PDF okuyucunun tam yoludur.
Adım 5
İşlevleri çağırmak için bir tetikleyici kullanın. Bu, kodun ne zaman yürütüleceğini bu şekilde bilecektir. İstediğiniz tetikleyiciyi kullanın; bir form, düğme, onay kutusu veya başka bir form öğesi. Örneğin, bir düğmenin "Tıkla" bildirimini kullanın. Düğmeye tıklandığında, PDF belgesi açılacak ve ardından yazdırılacaktır. Kod şöyle görünür:
Sub CommandButton_Click() 'PDF'nin yazdırmadan önce açılabilmesi için önce açma işlevini çağırın OpenPDF'yi çağırın 'Şimdi PDF'nin yazdırılabilmesi için yazdırma işlevini çağırın PrintPDF End Sub'ı çağırın
Sadece yukarıdaki kodun orta kısmını (Sub ve End Sub arasında) form öğesine kopyalayın ve kullanmaya karar verdiğiniz tetikleyin.
İhtiyacınız Olan Şeyler
Bir Microsoft Office uygulaması
PDF okuyucu uygulaması
Uç
2007 sürümünü kullanıyorsanız ve "Geliştirici" sekmesini görmüyorsanız, "Ofis" düğmesini ve ardından menünün altındaki "Seçenekler" düğmesini tıklayın. "Şeritte Geliştirici sekmesini göster" üzerine tıklayın ve "Tamam" ı tıklayın.
