Adobe PDF-Dateien sind Dokumente, die Sie für die Leser über das Internet verteilen können geschützt. Sie können mehrere Dateitypen in PDF zu konvertieren , um Ihre Arbeit nicht kopiert oder bearbeitet schützen. Diese Dateien können on-the -fly mit Visual Basic Programmieren umgewandelt werden. Dies ist vorteilhaft, wenn Sie Dokumente auf Ihrem Web-Server , die Sie zu schützen und zu verteilen online zu haben. Visual Basic verfügt über einen internen Bibliotheken verwendet, um Ihre Excel -Datei in PDF konvertieren. Anleitung
1

Erstellen Sie Ihre Verbindung mit dem Excel-Arbeitsblatt. Dies geschieht mit Hilfe einer Verbindung Objekt, das die Excel-Treiber enthält . Der folgende Code erstellt die Excel- Anschluss:

Dim conn Wie ADODB.Connection

Dim connString As String

connString = " Driver = { Microsoft Excel Driver (* xls ). }; DriverId = 790; Dbq = ExcelFile.xls ; "

conn.ConnectionString = connString
2

Abrufen der Informationen aus dem Excel-Arbeitsblatt. In diesem Beispiel werden alle Informationen aus der Excel-Tabelle , um die gesamte Datei in das PDF zu konvertieren. Der folgende Code kopiert alle Excel-Daten :

sql = " SELECT * FROM Tabelle1 "

excel_records = Recordset.Open sql, con , adLockOptimistic , Ersetzen adCmdText

" Tabelle1 " mit dem Namen Ihrer Tabelle in der Datei.
3

erstellen Sie die PDF -Datei. Sie müssen zuerst initiieren die PDF -Klasse und geben Sie die Datei, für die der Inhalt übertragen wird. Der folgende Code erstellt und öffnet die Datei :

Dim As New pdf mjwPDF

pdf.PDFTitle = " Excel to PDF Konvertierung "

pdf.PDFFileName = " converted.pdf "
4

Speichern Sie die Excel- Informationen in die PDF -Datei. Der folgende Code überträgt Ihre Excel Informationen :

pdf.PDFTextOut excel_records.ToString
5

Schließen Sie die Excel -und PDF- Dateien , um die Ressourcen verwendet, um sie zu öffnen freizugeben. Das ist gut für Server -Leistung und entlastet jedem Betriebssystem Schlösser an den Dateien . Der folgende Code gibt die Dateien :

Set pdf = Nothing Set

conn = Nothing