Kako promijeniti ili izvesti Excel datoteke u PDF?
Ispod su primjeri izvoza excel datoteka u PDF.
Primjer # 1
Spremi proračunsku tablicu u PDF datoteku!
Na primjer, pogledajte dolje navedene podatke ili grafikon koji prikazuje hijerarhiju odjela u organizaciji.
Možemo jednostavno odabrati Spremi kao iz opcije Datoteka i odabrati Spremiti kao vrstu kao "PDF".
Ovo bi i dalje bila datoteka u PDF-u, ali pogledajte kako izgleda kad je otvorite.
U PDF-u dolazi u dva različita lista, što apsolutno nema smisla. Ako samo koristite Spremi kao i odaberete vrstu datoteke kao PDF, to se događa kada je sadržaj datoteke ili proračunske tablice više od prostora za uklapanje u jedan PDF list.
Zbog toga ono što trebamo učiniti jest odabrati područje sadržaja koje pokušavamo spremiti kao PDF datoteku. Zatim pritisnite Ctrl + P da biste se otvorili ispod prozora za pregled ispisa.
U odjeljku Postavke odaberite "Stavi list na jednu stranicu".
Sada kliknite Spremi kao u istom prozoru i odaberite PDF kao vrstu datoteke.
To će uklopiti cijele podatke u jednu PDF stranicu.
Ovo je uobičajena tehnika koju smo svi redovito koristili.
Međutim, što ako gumb može stvoriti PDF datoteku proračunske tablice Excel ??? Da, to se može učiniti pomoću VBA kodiranja; slijedite korake u nastavku za stvaranje VBA koda za pretvaranje excel lista u PDF.
Primjer # 2 - Korištenje VBA koda
Koraci za pretvaranje excel lista u PDF pomoću VBA koda.
Korak 1: Prijavite varijable u VBA, kao što je prikazano dolje.
Korak 2: Sada postavite referencu radne knjige i radnog lista na varijable „Ws“ i „Wb.“
Korak 3: Da bismo datoteci dali ime, moramo zabilježiti trenutno vrijeme, tj. Vrijeme u vrijeme pokretanja koda. Postavite vrijeme na varijablu "SaveTime".
Korak 4: Sada moramo spremiti PDF datoteku na točno mjesto radne knjige na kojoj radimo. Dodijelite ovu vrijednost varijabli "Spremi put".
Korak 5: Sada moramo kombinirati imena datoteka i vrijeme kako bismo stvorili jedinstveni naziv datoteke.
Korak 6: Moramo dati mogućnost odabira odredišnog puta za spremanje datoteke.
Korak 7: Sada moramo stvoriti PDF datoteku.
U slučaju da dođe do pogreške, trebamo to riješiti. Dakle, donji kod će učiniti isto.
Ispod je cjeloviti kod za vas.
Kodirati:
Sub Excel_To_PDF () 'Deklariraj varijable Dim Ws as Workheet Dim Wb As Workbook Dim SaveTime As String Dim SaveName As String Dim SavePath As String Dim FileName As String Dim FullPath As String Dim SelectFolder As Variant' Set Variables on Error GoTo EH Set Wb = ActiveWorkbook Postavite Ws = ActiveSheet 'Snimanje trenutnog vremena SaveTime = Format (Now (), "yyyy mm dd _ hhmm")' Snimanje trenutne adrese puta mape radne knjige SavePath = Wb.Path If SavePath = "" Onda SavePath = Application.DefaultFilePath End If SavePath = SavePath & " " 'Dajte imenu datoteku SaveName = "PDF" FileName = SaveName & "_" & SaveTime & ".pdf"' Uputite Gdje spremiti FullPath = SavePath & FileName 'Omogućite alat za odabir mapa da biste odabrali gdje želite spremiti datoteka SelectFolder = Aplikacija.GetSaveAsFilename _ (InitialFileName: = FullPath, _ FileFilter: = "PDF datoteke (* .pdf), * .pdf", _ Naslov: = "Odaberite mapu i ime datoteke za spremanje") 'Stvori PDF datoteku ako je SelectFolder "False", a zatim Ws .ExportAsFixedFormat _ Tip: = xlTypePDF, _Naziv datoteke: = SelectFolder, _ Kvaliteta: = xlQualityStandard, _ IncludeDocProperties: = Tačno, _ IgnorePrintAreas: = False, _ OpenAfterPublish: = False End If exitHandhler: Exit to Mble Subhander: Ait stvoriti PDF datoteku "Nastavi izlazHandler End Sub= False, _ OpenAfterPublish: = False End If exitHandler: Exit Sub EH: MsgBox "Not Able to create PDF file" Nastavi exitHandler End Sub= False, _ OpenAfterPublish: = False End If exitHandler: Exit Sub EH: MsgBox "Not Able to create PDF file" Nastavi exitHandler End Sub
Kopirajte ovaj kod i zalijepite u modul Visual Basic Editora da biste otvorili uređivač Visual Basic pritisnite alt = "" + F11. Kada pokrenemo ovaj kod pritiskom na tipku F5, dobit ćemo sljedeću opciju.
Možete vidjeti da je vaša excel datoteka pretvorena u PDF.
Stvari koje treba zapamtiti
- Ako podaci ne odgovaraju dovoljno za jednu stranicu, tada će PDF dodatni sadržaj pomaknuti na sljedeći list.
- Ovaj kôd stvorit će cjelokupan sadržaj radnog lista kao PDF datoteku.
- Nakon što kopirate makronaredbu, radnu knjigu morate spremiti kao radnu knjigu s omogućenim makronaredbama.
