Как да експортирате диаграми в графики в Excel?
В Excel понякога можете да генерирате някои диаграми от данните, така че данните да изглеждат по-визуални и директни. Ако искате да запазите или експортирате диаграмите в графики за някаква цел, как бихте могли да го направите?
Експортирайте диаграма в графика с VBA код
Експортирайте множество диаграми/снимки/форми в графики с Kutools за Excel
Експортирайте диаграма в графика с 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 за да стартирате този код и въведете името за експортираната диаграма в полето за подкана, вижте екранната снимка:
5, И после щракнете върху OK, избраната диаграма е експортирана в Gif формат и се запазва на същото място като оригиналния файл. Вижте екранна снимка:
С горния VBA код можете да експортирате само една диаграма наведнъж, ако искате да експортирате други диаграми, моля, първо изберете друга диаграма и след това я експортирайте с кода.
Експортирайте множество диаграми/снимки/форми в графики с Kutools за Excel
Kutools за ExcelЕ Експортиране на графики помощната програма може да експортира множество диаграми, картини или форми наведнъж в Excel.
Kutools за Excel, с повече от 300 удобни функции, прави работата ви по-лесна. |
След инсталиране Kutools за Excel, моля, направете следното:(Безплатно изтегляне Kutools за Excel сега!)
1. Щракнете Kutools плюс > Внос / Износ > Експортиране на графики, вижте екранна снимка:
2. В Експортиране на графики диалогов прозорец, всички класациите, снимки намлява форми са изброени в лявото списъчно поле, посочете типа, който искате да експортирате, след което щракнете бутон, за да посочите директория за запазване на експортираните графики, в същото време можете да изберете формата на снимките от формата за експортиране, както ви е необходимо, като напр. GIF, JPEG, TIF or PNG.
3, След това кликнете OK, всички диаграми, картини и фигури са експортирани успешно на посоченото място. Вижте екранни снимки:
; |
Моля, кликнете Експортиране на графики за да научите повече за тази функция.
Експортиране на графики
Експортиране на диапазон във файл |
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!