Jak wyeksportować wykresy do grafiki w programie Excel?
W programie Excel czasami można wygenerować niektóre wykresy na podstawie danych, aby dane wyglądały bardziej wizualnie i bezpośrednio. Jeśli chcesz zapisać lub wyeksportować wykresy do grafiki w jakimś celu, jak możesz to zrobić?
Eksportuj wykres do grafiki za pomocą kodu VBA
Eksportuj wiele wykresów / obrazów / kształtów do grafiki za pomocą Kutools for Excel
Eksportuj wykres do grafiki za pomocą kodu VBA
Poniższy kod VBA może pomóc w wyeksportowaniu wybranego wykresu z aktywnego arkusza jako obrazu. Obraz zostanie zapisany w tej samej lokalizacji, co zastosowany skoroszyt. Wykonaj następujące czynności:
1. Wybierz wykres, który chcesz wyeksportować.
2. Następnie przytrzymaj ALT + F11 klucze i otwiera plik Microsoft Visual Basic for Applications okno.
3. Kliknij wstawka > Modułi wklej następujący kod w oknie modułu.
VBA: Eksportuj wykres do grafiki
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. Następnie naciśnij F5 klucz do uruchomienia tego kodu i wprowadź nazwę wyeksportowanego wykresu w polu zachęty, patrz zrzut ekranu:
5. A następnie kliknij OK, wybrany wykres został wyeksportowany do Gif format i zapisane w tej samej lokalizacji, co oryginalny plik. Zobacz zrzut ekranu:
Dzięki powyższemu kodowi VBA możesz wyeksportować tylko jeden wykres na raz, jeśli chcesz wyeksportować inne wykresy, najpierw wybierz inny wykres, a następnie wyeksportuj go z kodem.
Eksportuj wiele wykresów / obrazów / kształtów do grafiki za pomocą Kutools for Excel
Kutools dla programu Excel'S Eksportuj grafikę narzędzie może eksportować wiele wykresów, obrazów lub kształtów jednocześnie w programie Excel.
Kutools dla programu Excel, ponad 300 przydatne funkcje, ułatwiają pracę. |
Po zainstalowaniu Kutools dla programu Excel, wykonaj poniższe czynności :(Bezpłatne pobieranie Kutools dla programu Excel teraz!)
1. Kliknij Kutools Plus > Import / Export > Eksportuj grafikęzobacz zrzut ekranu:
2, w Eksportuj grafikę okno dialogowe, wszystkie pliki wykresy, zdjęcia i kształty zostały wymienione w lewym polu listy, określ typ, który chcesz wyeksportować, a następnie kliknij przycisk, aby określić katalog, w którym ma zostać zapisana eksportowana grafika, jednocześnie możesz wybrać format zdjęć z formatu eksportu według potrzeb, na przykład GIF, JPEG, TIF or PNG.
3. Następnie kliknij OK, wszystkie wykresy, obrazy i kształty zostały pomyślnie wyeksportowane do określonej lokalizacji. Zobacz zrzuty ekranu:
; |
Proszę kliknąć Eksportuj grafikę aby dowiedzieć się więcej o tej funkcji.
Eksportuj grafikę
Eksportuj zakres do pliku |
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!