Note: The other languages of the website are Google-translated. Back to English

Sut i drosi nifer o lyfrau gwaith neu daflenni gwaith yn ffeiliau PDF ar unwaith yn Excel?

Rywbryd, mae angen i chi drosi eich ffeiliau Excel yn ffeiliau PDF, fel na all eraill eu haddasu. Yn Excel, gallwn arbed ffeil Excel fel ffeil PDF trwy ddefnyddio swyddogaeth Save As. Ond sut ydych chi'n trosi llyfrau gwaith lluosog i ffeiliau PDF ar yr un pryd yn Excel?


Trosi llyfrau gwaith lluosog i ffeiliau PDF gyda swyddogaeth Save As fesul un

Fel rheol, gall y nodwedd Save As yn Excel eich helpu chi i gadw'r llyfr gwaith cyfan i ffeil PDF, gwnewch fel hyn:

1. Lansio'ch llyfr gwaith rydych chi am ei drosi i fformat PDF.

2. Cliciwch ffeil > Save As, ac yn y Save As blwch deialog, nodwch ffolder ar gyfer cadw'r ffeil newydd, yna dewiswch PDF oddi wrth y Cadw fel math rhestr ostwng, ac yna, cliciwch Dewisiadau botwm, gweler y screenshot:

3. Yna, yn y popped allan Dewisiadau blwch deialog, gwirio Llyfr gwaith cyfan, gweler y screenshot:

4. Ac yna cliciwch OK > Save, mae'r llyfr gwaith cyfan hwn wedi'i gadw fel fformat ffeil PDF.

Awgrymiadau: Os oes gennych chi nifer o lyfrau gwaith sydd angen eu trosi, gwnewch gais uchod i gadw'r llyfrau gwaith i ffeiliau PDF fesul un.

Trosi llyfrau gwaith lluosog i ffeiliau PDF gyda chod VBA ar unwaith

Os oes cannoedd o ffeiliau Excel mae angen eu trosi, bydd y dull uchod yn drafferthus, yma, byddaf yn siarad am god VBA ar gyfer trosi llyfrau gwaith lluosog yn ffeiliau PDF ar unwaith, gwnewch y camau canlynol:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.

Cod VBA: Trosi nifer o lyfrau gwaith yn ffeiliau PDF ar unwaith

Sub ExcelSaveAsPDF()
'Updateby Extendoffice
    Dim strPath As String
    Dim xStrFile1, xStrFile2 As String
    Dim xWbk As Workbook
    Dim xSFD, xRFD As FileDialog
    Dim xSPath As String
    Dim xRPath, xWBName As String
    Dim xBol As Boolean
    Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
    With xSFD
    .Title = "Please select the folder contains the Excel files you want to convert:"
    .InitialFileName = "C:\"
    End With
    If xSFD.Show <> -1 Then Exit Sub
    xSPath = xSFD.SelectedItems.Item(1)
    Set xRFD = Application.FileDialog(msoFileDialogFolderPicker)
    With xRFD
    .Title = "Please select a destination folder to save the converted files:"
    .InitialFileName = "C:\"
    End With
    If xRFD.Show <> -1 Then Exit Sub
    xRPath = xRFD.SelectedItems.Item(1) & "\"
    strPath = xSPath & "\"
    xStrFile1 = Dir(strPath & "*.*")
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    Do While xStrFile1 <> ""
        xBol = False
        If Right(xStrFile1, 3) = "xls" Then
            Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
            xbwname = Replace(xStrFile1, ".xls", "_pdf")
            xBol = True
        ElseIf Right(xStrFile1, 4) = "xlsx" Then
            Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
            xbwname = Replace(xStrFile1, ".xlsx", "_pdf")
            xBol = True
        ElseIf Right(xStrFile1, 4) = "xlsm" Then
            Set xWbk = Workbooks.Open(Filename:=strPath & xStrFile1)
            xbwname = Replace(xStrFile1, ".xlsm", "_pdf")
            xBol = True
        End If
        If xBol Then
            xWbk.ExportAsFixedFormat Type:=xlTypePDF, Filename:=xRPath & xbwname & ".pdf"
            xWbk.Close SaveChanges:=False
       End If
        xStrFile1 = Dir
    Loop
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
End Sub

3. Yna, pwyswch F5 allwedd i redeg y cod hwn, a bydd ffenestr yn cael ei harddangos, dewiswch ffolder sy'n cynnwys y llyfrau gwaith rydych chi am eu trosi, gweler y screenshot:

4. Yna, cliciwch OK, mae ffenestr arall wedi'i popio allan, dewiswch lwybr ffolder lle rydych chi am allbynnu'r ffeiliau PDF newydd, gweler y screenshot:

5. Ac yna, clik OK, ar ôl gorffen y trawsnewid, gallwch fynd i'r ffolder penodedig i gael rhagolwg o'r canlyniad wedi'i drosi, gweler sgrinluniau:


Trosi llyfrau gwaith lluosog i ffeiliau PDF gyda nodwedd bwerus

Os oes gennych Kutools ar gyfer Excel, Gyda'i Troswr Fformat cyfleustodau, gallwch drosi nifer o lyfrau gwaith yn ffeiliau PDF ar unwaith.

Awgrymiadau:I gymhwyso hyn Troswr Fformat nodwedd, yn gyntaf, dylech lawrlwytho'r Kutools ar gyfer Excel, ac yna cymhwyswch y nodwedd yn gyflym ac yn hawdd.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel hyn:

1. Cliciwch Kutools Byd Gwaith > Llyfr Gwaith > Troswr Fformat, gweler y screenshot:

2. Ac mae blwch prydlon yn cael ei popio allan i'ch atgoffa bod yn rhaid i chi gau'r llyfrau gwaith rydych chi am eu trosi.

3. Cliciwch OK, yna, yn y Converter FileFormat deialog, nodwch yr opsiynau canlynol:

  • O dan y Trosi math rhestr ostwng, dewiswch Llyfr gwaith Excel i PDF;
  • Yna cliciwch Ychwanegu botwm i ychwanegu'r ffeiliau Excel rydych chi am eu trosi, gallwch ychwanegu'r llyfrau gwaith o'ch disg cywasgwr neu OneDrive yn ôl yr angen; 

4. Ar ôl mewnosod y llyfrau gwaith rydych chi am eu trosi, yn dal i fod yn y Troswr Fformat Ffeil blwch deialog, cliciwch botwm i ddewis un llwybr ffolder i allbynnu'r ffeiliau wedi'u trosi, ac yna nodi rhai gweithrediadau sydd eu hangen arnoch ar waelod y blwch deialog, gweler y screenshot:

Nodiadau: Yn y blwch deialog uchod:
  • Os oedd angen trosi'r llyfrau gwaith yn yr is-ffolderi hefyd, gwiriwch y Cynhwyswch is-ffolderi wrth ychwanegu ffolderau blwch gwirio;
  • Os ydych chi am gael gwared ar y ffeiliau gwreiddiol ar ôl eu trosi, gwiriwch y Dileu ffeiliau ffynhonnell ar ôl eu trosi blwch;
  • Os ydych chi am gadw'r dyddiad wedi'i addasu ar gyfer ffeiliau gwreiddiol, gwiriwch y Cadwch ddyddiad wedi'i addasu ffeiliau gwreiddiol blwch;
  • Gellir cadw strwythur cyfeiriadur y ffeil trwy wirio'r Mae strwythur cyfeiriadur y ffeil yn cael ei gadw wrth ei drawsnewid blwch;

5. Yna cliciwch OK i ddechrau trosi, pan fydd yr holl ffeiliau Excel penodedig wedi'u trosi i'r ffeiliau PDF, gallwch fynd i'r ffolder penodedig i gael rhagolwg o'r canlyniad wedi'i drosi, gweler sgrinluniau:


Trosi taflenni gwaith lluosog o lyfr gwaith i wahanu ffeiliau PDF â chod VBA

Mewn rhai achosion, efallai yr hoffech drosi pob taflen waith yn y llyfr gwaith i wahanu ffeiliau PDF, os oes llawer o daflenni yn eich llyfr gwaith, gall y cod VBA isod eich helpu i arbed pob taflen waith fel ffeil PDF ar unwaith.

1. Agorwch lyfr gwaith rydych chi am ei drosi, ac yna daliwch y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.

Cod VBA: Trosi taflenni gwaith lluosog o lyfr gwaith i wahanu ffeiliau PDF

Sub SplitEachWorksheet()
'Updateby Extendoffice
Dim xSPath As String
Dim xSFD As FileDialog
Dim xWSs As Sheets
Dim xWb As Workbook
Dim xWbs As Workbooks
Dim xNWb As Workbook
Dim xInt, xI As Integer
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.title = "Please select a folder to save the converted files:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWb = Application.ActiveWorkbook
Set xWbs = Application.Workbooks
Set xWSs = xWb.Sheets
Set xNWb = xWbs.Add
xInt = xWSs.Count
For xI = 1 To xInt
On Error GoTo EBreak
Set xWs = xWSs.Item(xI)
If xWs.Visible Then
xWSs(xWs.Name).Copy
Application.ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=xSPath & "\" & xWs.Name & ".pdf"
Application.ActiveWorkbook.Close False
End If
EBreak:
Next
xWb.Activate
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. Yna, pwyswch F5 allwedd i redeg y cod hwn, ac mae ffenestr wedi'i popio allan, dewiswch lwybr ffolder ar gyfer lleoli'r ffeiliau PDF sydd wedi'u trosi, gweler y screenshot:

4. Yna, cliciwch OK botwm, mae'r holl daflenni gwaith yn y llyfr gwaith cyfredol wedi'u trosi ffeiliau PDF ar wahân, gweler y screenshot:


Trosi taflenni gwaith lluosog o lyfr gwaith i wahanu ffeiliau PDF gyda nodwedd ddefnyddiol

Kutools ar gyfer Excel hefyd yn cefnogi nodwedd ddefnyddiol - Llyfr Gwaith Hollti, gyda'r nodwedd hon, gallwch arbed nifer o daflenni gwaith yn y llyfr gwaith i wahanu ffeil Excel, ffeil Txt, ffeil CSV a ffeil PDF yn ôl yr angen.

Awgrymiadau:I gymhwyso hyn Llyfr Gwaith Hollti nodwedd, yn gyntaf, dylech lawrlwytho'r Kutools ar gyfer Excel, ac yna cymhwyswch y nodwedd yn gyflym ac yn hawdd.

Ar ôl gosod Kutools ar gyfer Excel, gwnewch fel hyn:

1. Agorwch y llyfr gwaith rydych chi am arbed pob dalen fel ffeil PDF, ac yna cliciwch Kutool Byd Gwaith > Llyfr Gwaith > Llyfr Gwaith Hollti, gweler y screenshot:

2. Yn y Llyfr Gwaith Hollti blwch deialog, gwiriwch y ddalen rydych chi am ei chadw, ac yna dewiswch PDF (* .pdf) oddi wrth y Cadw fel math rhestr ostwng, ac yna cliciwch Hollti botwm, yn y Dewis Ffolder ffenestr, nodwch ffolder ar gyfer rhoi'r ffeiliau wedi'u trosi, gweler y screenshot:

3. Ac yna, mae'r holl daflenni gwaith a ddewiswyd yn y llyfr gwaith cyfredol wedi'u cadw i ffeiliau PDF yn unigol, gweler y screenshot:


Erthyglau mwy cymharol:

  • Cadw Pob Taflen Waith Fel Gwerthoedd yn Unig
  • Os oes gennych lyfr gwaith sy'n cynnwys sawl fformiwla, nawr, mae angen i chi ddosbarthu'r ffeil hon i ddefnyddwyr eraill, nid ydych chi am ddangos y fformwlâu ond dim ond gwerthoedd sy'n cael eu harddangos. Fel rheol, gallwn arbed taflen waith yn gyflym fel gwerthoedd trwy gopïo a gludo'r data fel gwerthoedd yn unig. Ond, sut allech chi arbed pob taflen waith fel gwerthoedd yn unig heb gopïo a gludo fesul un?
  • Botwm Gorchymyn i Arbed Taflen Waith Egnïol Fel Ffeil PDF
  • Wrth weithio yn Microsoft Excel, efallai y byddwch yn wynebu'r broblem o arbed taflen waith weithredol fel ffeil PDF. Yn yr erthygl hon, gallwch ddysgu sut i arbed taflen waith weithredol fel ffeil PDF gyda chod VBA trwy Botwm Gorchymyn. Ac os ydych chi hefyd am arbed ystod neu bob taflen waith mewn llyfr gwaith gweithredol fel ffeil PDF unigol, gall yr erthygl hon hefyd eich helpu chi.
  • Rhannwch Dabl Mawr i Fyrddau Bach Lluosog
  • Os oes gennych daflen waith fawr sy'n cynnwys nifer o golofnau a channoedd neu filoedd o ddata rhesi, nawr, rydych chi am rannu'r tabl mawr hwn yn dablau bach lluosog yn seiliedig ar werth y golofn neu nifer y rhesi i gael y canlyniadau canlynol. Sut allech chi ddelio â'r dasg hon yn Excel?
  • Rhannwch lyfr gwaith i wahanu ffeiliau Excel
  • Efallai y bydd angen i chi rannu llyfr gwaith mawr i wahanu ffeiliau Excel gan arbed pob taflen waith o'r llyfr gwaith fel ffeil Excel unigol. Er enghraifft, gallwch rannu llyfr gwaith yn sawl ffeil Excel unigol ac yna danfon pob ffeil i wahanol berson i'w drin. Trwy wneud hynny, gallwch gael rhai pobl i drin data penodol, a chadw'ch data yn ddiogel. Bydd yr erthygl hon yn cyflwyno ffyrdd i rannu llyfr gwaith mawr i wahanu ffeiliau Excel yn seiliedig ar bob taflen waith.

Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (5)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yr wyf yn golygu a diweddaru fy data yn pdf explorer ac mae gennyf eisoes fy data ar y daflen excel felly yn awr yr wyf am allforio i fy excel log i pdf explorer sut
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn berffaith ar gyfer yr hyn yr oeddwn yn edrych amdano. Diolch am rannu. Roeddwn i'n arfer trosi ffeil excel yn ffeil PDF gydag Acethinker PDF Creator, un wrth un, ddim mor gyflym, ei rannu yma fel ateb amgen.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
y vba yn dda iawn ac yn gwasanaethu fy mhwrpas yn dda. ond oni ellir newid y cod hwn i greu pdf o ddalen benodol ar gyfer ffeiliau excel lluosog (dyweder 3ydd taflen waith o bob un o'r 100 o lyfrau gwaith excel sydd gennyf).
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch yn fawr iawn am y cod hwn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo gallai hyn fod yn llawer, ond a oes ffordd i wneud VBA a fyddai'n gwahanu taflenni gwaith llyfrau gwaith lluosog i'w ffeil pdf eu hunain ac i bob pennawd fod yn destun mewn cell benodol mewn taflen waith ar gyfer pob un?
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir