Excelin taulukko välilehtien tallennus PDF-tiedostoiksi

Tämä vastaus on käännetty automaattisesti. Tämän seurauksena saattaa ilmetä kielioppivirheitä tai outoa sanamuotoa.

Moikka

Kiitos, että päivitit kanssamme!

Pahoittelen, etten huomannut, että laitteesi on Mac.

Valitettavasti MacOS-järjestelmän erityispiirteiden vuoksi ei ole mahdollista viedä arkkeja suoraan PDF-tiedostoina yksinkertaisesti napsauttamalla tai käyttämällä VBA: ta kuten Windows-koneella. VBA-vientimenetelmä on yksinomaan Windowsissa, koska VBA: lla ei ole suoraa pääsyä toimintoihin, joita tarvitaan tiedostojen viemiseen macOS: ssa. Tällä hetkellä suosittelemme tutustumaan jompaankumpaan näistä kahdesta vaihtoehtoisesta ratkaisusta:

1. Käytä MacOS:n alkuperäistä "Tallenna PDF-tiedostona" -ominaisuutta viedäksesi jokaisen arkin erikseen.
2. Yritä suorittaa edellä mainittu makro Windows-laitteessa viedäksesi kaikki taulukot yhtenä PDF-tiedostona.

Pahoittelen vielä kerran väärinkäsityksestäni aiheutunutta vaivaa.

Tuomas

Tämä ohje näyttäisi toimivan, mutta ongelma tulee tuossa oletustulostimen asettamisessa, kun Macbookilla ei ole tuo näköistä tulostusvaihtoehtoa. Miten saisin valittua tulostimeksi PDF-tiedoston Macillä?

Tämä vastaus on käännetty automaattisesti. Tämän seurauksena saattaa ilmetä kielioppivirheitä tai outoa sanamuotoa.

Hei Ellisusi,

Kiitos viestistäsi Microsoft Community -yhteisössä.

Kuvauksesi perusteella näyttää siltä, että haluat tietää, kuinka kaikki Excel-työkirjan arkit tallennetaan yksittäisinä PDF-tiedostoina, joista jokainen on nimetty vastaavien arkkien nimien mukaan, yhdellä toiminnolla, voimme täysin ymmärtää ahdinkosi ja teemme kaikkemme auttaaksemme sinua.

Tämän tehtävän suorittaminen edellyttää makrojen (VBA) käyttöä. Tässä ovat vaiheet:

1. Napsauta Excel-nauhan "Kehittäjä" -välilehteä ja valitse sitten "Makrot".
2. Kirjoita avautuvassa uudessa ikkunassa makron nimi ja napsauta "Luo".
3. Kopioi seuraava koodi ja liitä se rivien Sub MacroName() ja End Sub väliin. Varmista, että korvaat MacroName vaiheessa 2 määrittämälläsi nimellä ja tallenna työkirja.

        Dim ws As Worksheet
   
        Dim wb As Workbook
   
        Dim strPath As String
   
        Dim strFile As String
   
        Set wb = ThisWorkbook
   
        strPath = wb.Path & "\"
   
        For Each ws In wb.Worksheets
   
            strFile = strPath & ws.Name & ".pdf"
   
            ws.ExportAsFixedFormat Type:=xlTypePDF, Filename:=strFile, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
   
        Next ws
   
        MsgBox "All sheets are saved as PDF", vbInformation, "Done"
   

4. Palaa "Kehittäjä" -välilehdelle ja napsauta "Makrot" uudelleen. Valitse uudessa ikkunassa juuri luomasi makro ja napsauta "Suorita".
5. Juuri luodut PDF-tiedostot, joista kukin on nimetty taulukoiden nimien mukaan, löytyvät samasta hakemistosta kuin Excel-työkirja. Makron suorittamisen jälkeen:
6. Varmista, että Excelin tulostinasetukset on määritetty vastaavasti, kuten asettamalla se 'Microsoft Print to PDF' täällä, jotta makro toimii sujuvasti.         

Ole hyvä ja jaa tulos kanssamme. Odotamme innolla päivitystäsi. Jos sinulla on lisäkysymyksiä, ota rohkeasti yhteyttä!

Kiitos yhteistyöstä ja ymmärryksestä. Toivon, että pysyt turvassa ja hyvin!

Parhain terveisin

Thomas C - MSFT | Microsoft-yhteisön tukiasiantuntija