Sådan ændres eller eksporteres Excel-filer til PDF?
Nedenfor er eksempler på eksport af Excel-filer til PDF.
Eksempel nr. 1
Gem regneark som PDF-fil!
Se f.eks. Nedenstående data eller diagram, der viser hierarkiet for afdelingen i en organisation.
Vi kan bare vælge Gem som fra filindstillingen og vælg Gem som-typen som "PDF".
Dette vil stadig være filen som PDF, men se, hvordan den ser ud, når du åbner den.
I PDF er den kommet i to forskellige ark, som slet ikke giver mening. Hvis du bare bruger Gem som og vælger filtypen som PDF, sker det, når fil- eller regnearkindholdet er mere end monteringsområdet for et enkelt PDF-ark.
Til dette er det, vi skal gøre, at vælge det indholdsområde, som vi prøver at gemme som en PDF-fil. Tryk derefter på Ctrl + P for at åbne under vinduet med forhåndsvisning af udskrivning.
Under "Indstillinger" skal du vælge "Tilpas ark på en side."
Klik nu på Gem som i samme vindue, og vælg PDF som filtype.
Dette passer alle dataene til en enkelt PDF-side.
Dette er den almindelige teknik, som vi alle har brugt regelmæssigt.
Men hvad hvis en knap kan producere en PDF-fil af Excel-regnearket ??? Ja, dette kan gøres ved hjælp af VBA-kodning; følg nedenstående trin for at oprette VBA-kode for at konvertere excel-arket som PDF.
Eksempel 2 - Brug af VBA-kode
Trin til at konvertere et excel-ark til PDF ved hjælp af VBA-kode.
Trin 1: Erklær variabler i VBA, som vist nedenfor.
Trin 2: Indstil nu projektmappe og regnearkhenvisning til variablerne "Ws" og "Wb."
Trin 3: For at give filen et navn skal vi registrere det aktuelle tidspunkt, dvs. tidspunktet på tidspunktet for kørsel af koden. Indstil tiden til variablen "SaveTime."
Trin 4: Nu skal vi gemme PDF-filen på den nøjagtige placering af den projektmappe, som vi arbejder på. Tildel denne værdi til variablen "Gem sti."
Trin 5: Nu skal vi kombinere filnavne og tid til at oprette et unikt filnavn.
Trin 6: Vi skal give mulighed for at vælge destinationsstien for at gemme filen.
Trin 7: Nu skal vi oprette en PDF-fil.
Hvis der opstår en fejl, skal vi også håndtere dette. Så nedenunder kode vil gøre det samme.
Nedenfor er den fulde kode til dig.
Kode:
Sub Excel_To_PDF () 'Erklær variabler Dim Ws som regneark Dim Wb som projektmappe Dim SaveTime som streng Dim SaveName Som streng Dim SavePath som streng Dim FileName Som streng Dim FullPath som streng Dim SelectFolder som variant' Indstil variabler på fejl GoTo EH Set Wb = ActiveWorkbook Set Ws = ActiveSheet 'Record Current Time SaveTime = Format (Now (), "yyyy mm dd _ hhmm")' Record Current Workbook Folder Path Address SavePath = Wb.Path If SavePath = "" Then SavePath = Application.DefaultFilePath End If SavePath = SavePath & " " 'Giv filen et navn SaveName = "PDF" FileName = SaveName & "_" & SaveTime & ".pdf"' Instruktioner Hvor skal du gemme FullPath = SavePath & FileName 'Aktiver mappevælger for at vælge, hvor du vil gemme filen SelectFolder = Application.GetSaveAsFilename _ (InitialFileName: = FullPath, _ FileFilter: = "PDF Files (* .pdf), * .pdf", _ Title: = "Select Folder and FileName to save") 'Opret PDF-fil, hvis SelectFolder "Falsk", så Ws .ExportAsFixedFormat _ Type: = xlTypePDF, _ FileName: = SelectFolder, _ Quality: = xlQualityStandard, _ IncludeDocProperties: = True, _ IgnorePrintAreas: = False, _ OpenAfterPublish: = False End If exitHandler: Exit Sub EH: M Opret PDF-fil "Genoptag exitHandler End Sub= False, _ OpenAfterPublish: = False End Hvis exitHandler: Exit Sub EH: MsgBox "Ikke i stand til at oprette PDF-fil" Genoptag exitHandler End Sub= False, _ OpenAfterPublish: = False End Hvis exitHandler: Exit Sub EH: MsgBox "Ikke i stand til at oprette PDF-fil" Genoptag exitHandler End Sub
Kopier denne kode og indsæt i modulet i Visual Basic Editor for at åbne visual basic editor, tryk på alt = "" + F11. Når vi kører denne kode ved at trykke på F5-tasten, får vi følgende mulighed.
Du kan se, at din excel-fil nu er konverteret til PDF.
Ting at huske
- Hvis dataene ikke passer til en enkelt side, skubber PDF det ekstra indhold til næste ark.
- Denne kode opretter hele regnearksindholdet som en PDF-fil.
- Når du har kopieret makrokoden, skal du gemme projektmappen som en makroaktiveret projektmappe.
