The Excel? Følgende VBA-kode kan hjelpe deg med å eksportere til et markert diagram fra det aktive regnearket som et bilde. Og bildet vil bli lagret på samme sted som den arbeidsboken du har søkt. Gjør som følger:
1. Marker diagrammet som du vil eksportere.
To. Deretter Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vinduet.
3. Klikk Sett > Modul, og lim inn følgende kode i modulen Window.
Option Explicit
Sub ExportChart ()
Const sSlash $ = "/"
Const sPicType $ = ".gif"
Dim sChartName $
Dim Späth $
Dim sBook $
Dim objChart Som ChartObject
On Error Resume Next
Sett objChart = ActiveSheet.ChartObjects (1)
Hvis objChart Er Ingenting Deretter
MsgBox "No diagrammer har blitt oppdaget på dette arket", 0
Exit Sub
End If
Hvis ActiveChart Er Ingenting Deretter
MsgBox "Du må velge et enkelt diagram for eksport", 0
Exit Sub
End If
Start:
sChartName = Application.InputBox ("Please Angi et navn for den eksporterte diagrammet" & vbCr & _ Anmeldelser "Det finnes ingen standardnavn tilgjengelig" & vbCr & _
"Diagrammet blir lagret i samme mappe som denne filen", "Chart Export", "")
< em> Hvis sChartName = Tom Så
MsgBox "Du har ikke angitt et navn for denne figuren", "Ugyldig Entry"
Goto start til End If Anmeldelser Hvis sChartName = "false" Så
Exit Sub
End If
sBook = ActiveWorkbook.Path
Späth = sBook & sSlash & sChartName & sPicType
ActiveChart.Export Name: = Späth, FilterName: = "GIF"
End Sub
fire. Deretter trykker du på F5 for å kjøre denne koden, og skriv inn navnet for den eksporterte diagrammet i teksten boksen, se skjermbilde:
5. Og klikk deretter på OK, har valgt diagrammet blitt eksportert til Gif-formatet, og lagres på samme sted som den opprinnelige filen. Se skjermbilde:
Med ovennevnte VBA-kode, kan du bare eksportere ett kart av gangen, hvis du ønsker å eksportere andre listene, kan du velge andre diagram først, og deretter eksportere det med koden
. Eksporter flere diagrammer /bilder /figurer til grafikk med Kutools for Excel
Kutools for Excel Eksporter Graphics verktøyet kan eksportere flere diagrammer, bilder eller figurer samtidig i Excel.
Kutools for Excel omfatter mer enn 120 hendig Excel verktøy. Gratis å prøve uten begrensning i 30 dager. . Få den nå
Hvis du har installert Kutools for Excel, kan du gjøre som følgende fremgangsmåte:
1. Klikk Enterprise > Import /Export > Export Graphics, se skjermbilde:
to. I Export Graphics dialogboksen har alle diagrammer, bilder og figurer vært oppført i listen til venstre boksen angir den typen som du vil eksportere, og klikk på knappen for å angi en katalog for å lagre de eksporterte grafikk, samtidig kan du velge formatet på bildene fra Export format som du trenger, for eksempel GIF, JPEG, TIF eller PNG
3.. Klikk deretter på OK, har alle diagrammer, bilder og figurer blitt eksportert til den angitte plasseringen vellykket. Se skjermbilder:
Klikk Eksporter Graphics å vite mer om denne funksjonen
.
Datamaskin læring 