Hvordan eksporteres diagrammer til grafik i Excel?

I Excel kan du nogle gange generere nogle diagrammer ud fra dataene, så dataene ser mere visuelle og direkte ud. Hvis du vil gemme eller eksportere diagrammerne til grafik til et eller andet formål, hvordan kan du gøre det?

Eksporter et diagram til grafik med VBA-kode

Eksporter flere diagrammer / billeder / figurer til grafik med Kutools til Excel

Eksporter et diagram til grafik med VBA-kode

Følgende VBA-kode kan hjælpe dig med at eksportere et valgt diagram fra det aktive regneark som et billede. Og billedet gemmes på samme sted som den projektmappe, du anvendte. Gør som følger:

1. Vælg det diagram, du vil eksportere.

2. Hold derefter nede ALT + F11 tasterne, og det åbner Microsoft Visual Basic til applikationer vindue.

3. Klik indsatte > Moduler, og indsæt følgende kode i modulvinduet.

VBA: Eksporter diagram til grafik

Option Explicit
Sub ExportChart()
Const sSlash$ = "/"
Const sPicType$ = ".gif"
Dim sChartName$
Dim sPath$
Dim sBook$
Dim objChart As ChartObject
On Error Resume Next
Set objChart = ActiveSheet.ChartObjects(1)
If objChart Is Nothing Then
MsgBox "No charts have been detected on this sheet", 0
Exit Sub
End If
If ActiveChart Is Nothing Then
MsgBox "You must select a single chart for exporting ", 0
Exit Sub
End If
Start:
sChartName = Application.InputBox("Please Specify a name for the exported chart" & vbCr & _
"There is no default name available" & vbCr & _
"The chart will be saved in the same folder as this file", "Chart Export", "")
If sChartName = Empty Then
MsgBox "You have not entered a name for this chart", , "Invalid Entry"
Goto Start
End If
If sChartName = "False" Then
Exit Sub
End If
sBook = ActiveWorkbook.Path
sPath = sBook & sSlash & sChartName & sPicType
ActiveChart.Export Filename:=sPath, FilterName:="GIF"
End Sub

4. Tryk derefter på F5 nøgle til at køre denne kode, og indtast navnet på det eksporterede diagram i promptfeltet, se skærmbillede:

5. Og klik derefter på OK, er det valgte diagram eksporteret til Gif format og gemmes på samme sted som den originale fil. Se skærmbillede:

Med ovenstående VBA-kode kan du kun eksportere et diagram ad gangen. Hvis du vil eksportere andre diagrammer, skal du først vælge et andet diagram og derefter eksportere det med koden.

Eksporter flere diagrammer / billeder / figurer til grafik med Kutools til Excel

Kutools til Excel's Eksporter grafik værktøj kan eksportere flere diagrammer, billeder eller figurer på én gang i Excel.

Efter installation Kutools til Excel, gør venligst som nedenfor :(Gratis download Kutools til Excel nu!)

1. Klik Kutools Plus > Import Eksport > Eksporter grafik, se skærmbillede:

2. I Eksporter grafik dialogboksen, alle diagrammer, billeder og former er angivet i venstre liste, angiv den type, du vil eksportere, og klik derefter på  knap for at angive en mappe til at gemme den eksporterede grafik, på samme tid kan du vælge formatet på billederne fra eksportformatet, som du har brug for, såsom GIF, JPEG, TIF or PNG.

3. Klik derefter på OK, alle diagrammer, billeder og figurer er blevet eksporteret til den angivne placering med succes. Se skærmbilleder:

;

Klik Eksporter grafik at vide mere om denne funktion.

  Eksporter grafik

Tip.Hvis du vil eksportere en rækkekontens fra projektmappe til en uafhængig fil, skal du prøve at bruge Kutools til Excel Eksporter rækkevidde til fil som vist i det følgende skærmbillede. Det er fuld funktion uden begrænsning på 60 dage, download venligst og få en gratis prøveperiode nu.

De bedste Office-produktivitetsværktøjer

Kutools til Excel løser de fleste af dine problemer og øger din produktivitet med 80%

• Genbruge: Indsæt hurtigt komplekse formler, diagrammer og alt, hvad du har brugt før; Krypter celler med adgangskode Opret postliste og send e-mails ...
• Super Formula Bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
• Flet celler / rækker / kolonner uden at miste data; Split celler indhold; Kombiner duplikerede rækker / kolonner... Forhindre duplikerede celler; Sammenlign områder...
• Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
• Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
• Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
• Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
• Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
• Mere end 300 kraftfulde funktioner. Understøtter Office / Excel 2007-2019 og 365. Understøtter alle sprog. Nem implementering i din virksomhed eller organisation. Fuld funktioner 30-dages gratis prøveperiode. 60-dages pengene tilbage garanti.

Læs mere ... Gratis download... Køb... 

---

Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

• Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
• Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
• Øger din produktivitet med 50% og reducerer hundredvis af museklik for dig hver dag!

Læs mere ... Gratis download... Køb...