Прескочи на основното съдържание

Как да експортирате диаграми в графики в Excel?

Автор: Xiaoyang Последна промяна: 2020-09-21

В Excel понякога можете да генерирате някои диаграми от данните, така че данните да изглеждат по-визуални и директни. Ако искате да запазите или експортирате диаграмите в графики за някаква цел, как бихте могли да го направите?

Експортирайте диаграма в графика с VBA код

Експортирайте множество диаграми/снимки/форми в графики с Kutools за Excel добра идея3


Експортирайте диаграма в графика с VBA код

Следният VBA код може да ви помогне да експортирате избрана диаграма от активния работен лист като картина. И картината ще бъде запазена на същото място като работната книга, която сте приложили. Направете следното:

1. Изберете диаграмата, която искате да експортирате.

2. След това задръжте натиснат ALT + F11 ключове и отваря Microsoft Visual Basic за приложения прозорец.

3. Щракнете Поставете > Модулии поставете следния код в прозореца на модула.

VBA: Експортиране на диаграма в графика

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. След това натиснете F5 за да стартирате този код и въведете името за експортираната диаграма в полето за подкана, вижте екранната снимка:

doc-export-charts1

5, И после щракнете върху OK, избраната диаграма е експортирана в Gif формат и се запазва на същото място като оригиналния файл. Вижте екранна снимка:

doc-export-charts2

С горния VBA код можете да експортирате само една диаграма наведнъж, ако искате да експортирате други диаграми, моля, първо изберете друга диаграма и след това я експортирайте с кода.


Експортирайте множество диаграми/снимки/форми в графики с Kutools за Excel

Kutools за ExcelЕ Експортиране на графики помощната програма може да експортира множество диаграми, картини или форми наведнъж в Excel.

Kutools за Excel, с повече от 300 удобни функции, прави работата ви по-лесна. 

След инсталиране Kutools за Excel, моля, направете следното:(Безплатно изтегляне Kutools за Excel сега!)

1. Щракнете Kutools плюс > Внос / Износ > Експортиране на графики, вижте екранна снимка:

диаграми за експортиране на doc7

2. В Експортиране на графики диалогов прозорец, всички класациите, снимки намлява форми са изброени в лявото списъчно поле, посочете типа, който искате да експортирате, след което щракнете doc-бутон1 бутон, за да посочите директория за запазване на експортираните графики, в същото време можете да изберете формата на снимките от формата за експортиране, както ви е необходимо, като напр. GIF, JPEG, TIF or PNG.

doc-export-charts4

3, След това кликнете OK, всички диаграми, картини и фигури са експортирани успешно на посоченото място. Вижте екранни снимки:

doc-export-charts5
;-1
doc-export-charts6


Моля, кликнете Експортиране на графики за да научите повече за тази функция.

Бакшиш.Ако искате да експортирате съдържание на диапазон от работна книга в независим файл, моля, опитайте да използвате Kutools за Excel Експортиране на диапазон във файл както е показано на следващата екранна снимка. Той е напълно функционален без ограничение за 60 дни, моля, изтеглете и получете безплатен пробен период сега.

Експортиране на диапазон във файл

doc експортиране на диапазон от клетки във файл

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi, I installed your addin and opened my excel and followed your tutorial. The export graphics button only brought up a small message box with no description. It did not bring up the Export Graphics dialog box. I have Excel 2007. If you can let me know why it is not working, really appreciate it. How to export charts to graphics in Excel? http://www.extendoffice.com/documents/excel/1151-excel-export-chart-to-image.html#a2<br /> Paul
This comment was minimized by the moderator on the site
[quote]Hi, I installed your addin and opened my excel and followed your tutorial. The export graphics button only brought up a small message box with no description. It did not bring up the Export Graphics dialog box. I have Excel 2007. If you can let me know why it is not working, really appreciate it. How to export charts to graphics in Excel? http://www.extendoffice.com/documents/excel/1151-excel-export-chart-to-image.html#a2<br /> PaulBy Paul001[/quote] Hello, Please try to uninstall the Kutools for Excel from your Control Panel first. And then go to download and install the software from http://www.extendoffice.com/download/kutools-for-excel.html<br /> If the problem persists, please try to contact me at jaychivo#extendoffice.com. Please replace # with @.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations