Merhaba
Aşağıdaki kod yardımıyla belirtilen konumdaki pdf dosyasını açıyorum. Bu işlevi yazdır komutuyla nasıl desteklerim? Yani açtığı pdf dosyasını sonrasında yazdıracak ve yazdırma işlemi sonrasında pdf dosyasını kapatacak. Şimdiden teşekkürler.
Private Sub CommandButton11_Click()
klasör = CreateObject("wscript.Shell").SpecialFolders.Item("Desktop")
dosya_adi = klasör & "\" & TextBox2.Text & ".pdf"
If CreateObject("Scripting.FileSystemObject").FileExists(dosya_adi) = False Then
MsgBox "pdf dosyası yok"
End If
If dosya_adi <> "" Then
CreateObject("Shell.Application").Open (dosya_adi)
End If
End Sub
Aşağıdaki kod yardımıyla belirtilen konumdaki pdf dosyasını açıyorum. Bu işlevi yazdır komutuyla nasıl desteklerim? Yani açtığı pdf dosyasını sonrasında yazdıracak ve yazdırma işlemi sonrasında pdf dosyasını kapatacak. Şimdiden teşekkürler.
Private Sub CommandButton11_Click()
klasör = CreateObject("wscript.Shell").SpecialFolders.Item("Desktop")
dosya_adi = klasör & "\" & TextBox2.Text & ".pdf"
If CreateObject("Scripting.FileSystemObject").FileExists(dosya_adi) = False Then
MsgBox "pdf dosyası yok"
End If
If dosya_adi <> "" Then
CreateObject("Shell.Application").Open (dosya_adi)
End If
End Sub