3 módszer az Excel-munkafüzet összes diagramjának kötegelt exportálására egy Windows mappába

Van egy Excel-munkafüzete, amely sok diagramot tartalmaz az összes Excel-munkalapon. Most, ha az összes diagramot kötegelt exportálni szeretné egy Windows mappába, használhatja a cikkben bemutatott 3 módszer bármelyikét.

Miután több diagramot készített az Excel-munkafüzet adataihoz, érdemes lehet ezeket a diagramokat is exportálni egy helyi mappába JPEG képfájlként. Ebben az esetben természetesen használhatja a következő 1. módszert a diagramok egyenkénti manuális mentéséhez. Mégis unalmas lesz, ha több száz munkalap és diagram van az Excel fájlban. Tehát itt megtanítjuk a másik 2 megközelítést, amelyek lehetővé teszik, hogy tömegesen szerezze be.

1. módszer: Diagramok másolása MS Word/PowerPoint

1. Mert minttart, válasszon egy diagramot az Excel fájlból.
2. Ezután kattintson a jobb gombbal rá, és válassza a „Másolás” lehetőséget a helyi menüből.
3. Ezután hozzon létre egy új Word-dokumentumot.
4. Később kattintson a „Beillesztés” gombra, és válassza a „Speciális beillesztés” opciót.
5. A felugró párbeszédpanelen válassza ki a „Kép (JPEG)” elemet az „As” listából, majd kattintson az „OK” gombra.
6. Ezt követően helyezze el a beillesztett képet a dokumentumban.
7. Ezután kattintson rá jobb gombbal, és válassza a „Mentés képként” opciót.
8. A „Fájl mentése” ablakban írjon be egy nevet, és válassza ki tarszerezze be a Windows mappát.
9. Végül kattintson a „Mentés” gombra.
10. Most ezzel a módszerrel exportálhatja a többi diagramot az Excel fájlból.

2. módszer: Mentse munkafüzetet weblapként

1. Az elején a megnyitott Excel-munkafüzetben lépjen a „Fájl” elemre, és kattintson a „Mentés másként” gombra.
2. Ezután a felugró „Mentés másként” ablakban válassza a „Weboldal” lehetőséget a „Mentés másként” mezőben.
3. Később válassza ki a cél Windows mappát, és kattintson a „Mentés” gombra.
4. Ezután keresse meg a „XXX_files” mappát, amelyben megtekintheti a diagramok exportált képeit.

3. módszer: Kötegelt exportálás Excel VBA-n keresztül

1. Kezdésként indítsa el az Excel VBA szerkesztőt a „A VBA kód futtatása az Excelben".
2. Ezután helyezze be a következő kódot egy modulba vagy projektbe.

Sub ExportAllCharts()
    Dim objShell As Object
    Dim objWindowsFolder As Object
    Dim strWindowsFolder As String
    Dim objSheet As Excel.Worksheet
    Dim objChartObject As Excel.ChartObject
    Dim objChart As Excel.Chart

    'Select a Windows folder
    Set objShell = CreateObject("Shell.Application")
    Set objWindowsFolder = objShell.BrowseForFolder(0, "Select a Windows folder:", 0, "")

    If Not objWindowsFolder Is Nothing Then
       strWindowsFolder = objWindowsFolder.self.Path & "\"

       For i = ThisWorkbook.Worksheets.Count To 1 Step -1
           Set objSheet = ThisWorkbook.Worksheets(i)

           If objSheet.ChartObjects.Count > 0 Then
              For Each objChartObject In objSheet.ChartObjects
                  Set objChart = objChartObject.Chart
                  objChart.Export strWindowsFolder & objChart.Name & ".jpg"
              Next
          End If
       Next

       'Open the windows folder
       Shell "Explorer.exe" & " " & strWindowsFolder, vbNormalFocus
   End If
End Sub

3. Ezután nyomja meg az „F5” billentyűt a makró futtatásához.
4. Ezután válasszon ki egy Windows mappát a felugró párbeszédpanelen.
5. Egyszerre megjelenik a Windows mappa, amely az exportált diagramokat tartalmazza.

Compare

Sérült Excel-fájlok javítása

Az Excel fájlok más gyakori fájlokhoz, például a Word dokumentumokhoz hasonlóan sebezhetőek. Ezért ajánlott erősen tartani xls javítás közmű a közelben, mint pl DataNumen Excel Repair. Hasznos lesz, ha az Excel fájl megsérül.

Szerző Bevezetés:

Shirley Zhang adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve sérült sql és outlook javítószoftver termékek. További információért látogasson el www.datanumen.com