Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս արտահանել գծապատկերները գրաֆիկայի մեջ Excel- ում:

Excel- ում երբեմն կարող եք տվյալներից որոշ գծապատկերներ ստեղծել, որպեսզի տվյալներն ավելի տեսողական և ուղիղ տեսք ունենան: Եթե ​​ցանկանում եք պահպանել կամ արտահանել գծապատկերները գրաֆիկայի ինչ-որ նպատակով, ինչպե՞ս կարող եք անել:

Արտահանեք գծապատկեր VBA կոդով գծապատկերին

Excel- ի համար Kutools- ի միջոցով արտահանեք բազմաթիվ գծապատկերներ / նկարներ / ձևեր գրաֆիկայի մեջ լավ գաղափար 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- արտահանման-գծապատկերներ 1

5. Եվ այնուհետեւ կտտացրեք OK, ընտրված գծապատկերը արտահանվել է դեպի gif ձևաչափը և պահպանվել է նույն վայրում, ինչ բուն ֆայլը: Տեսեք,

doc- արտահանման-գծապատկերներ 2

Վերոնշյալ VBA կոդով դուք կարող եք միաժամանակ արտահանել միայն մեկ գծապատկեր, եթե ցանկանում եք այլ գծապատկերներ արտահանել, նախ ընտրեք այլ գծապատկեր, այնուհետև այն արտահանեք ծածկագրով:


Excel- ի համար Kutools- ի միջոցով արտահանեք բազմաթիվ գծապատկերներ / նկարներ / ձևեր գրաֆիկայի մեջ

Excel- ի համար նախատեսված գործիքներ'S Արտահանել գրաֆիկա օգտակար ծրագիրը կարող է միանգամից արտահանել բազմաթիվ գծապատկերներ, նկարներ կամ ձևեր Excel- ում:

Excel- ի համար նախատեսված գործիքներ, ավելի քան 300 հարմար գործառույթներ, ավելի հեշտացնում է ձեր գործերը: 

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև :(Անվճար ներբեռնեք Kutools- ի համար Excel- ը հիմա!)

1: Սեղմեք Kutools Plus > Ներմուծման արտահանման > Արտահանել գրաֆիկա, տես նկարի նկարը.

փաստաթղթերի արտահանման գծապատկերներ 7

2, Մեջ Արտահանել գրաֆիկա երկխոսության տուփ, բոլորը տրամագրերը, լուսանկարները և ձեւավորում նշված են ձախ ցուցակի վանդակում, նշեք այն տեսակը, որը ցանկանում եք արտահանել, ապա կտտացրեք դոկ-կոճակ 1 արտահանվող գրաֆիկան պահպանելու համար գրացուցակ նշելու կոճակը, միևնույն ժամանակ, դուք կարող եք ընտրել նկարների ձևաչափը Արտահանման ձևաչափից, ինչպես ձեզ հարկավոր է, GIF, JPEG, TIF or PNG.

doc- արտահանման-գծապատկերներ 4

3. Այնուհետեւ կտտացրեք OK, բոլոր գծապատկերները, նկարներն ու ձևերը հաջողությամբ արտահանվել են նշված վայր: Տեսեք սքրինշոթերը.

doc- արտահանման-գծապատկերներ 5
;-1
doc- արտահանման-գծապատկերներ 6


Խնդրում ենք սեղմել Արտահանել գրաֆիկա ավելին իմանալ այս հատկության մասին:

ՀուշումԵթե ​​ցանկանում եք աշխատանքային գրքից մի շարք պարունակություններ արտահանել անկախ ֆայլ, փորձեք օգտագործել Excel- ի համար նախատեսված Kutools Արտահանեք տեսականին ֆայլ ինչպես ցույց է տրված հետևյալ նկարում Դա լիարժեք գործառույթ է ՝ առանց սահմանափակումների 60 օրվա ընթացքում, խնդրում ենք ներբեռնել և անվճար փորձաշրջան անցնել հիմա:

Արտահանեք տեսականին ֆայլ

փաստաթղթերի արտահանման բջիջների տիրույթը

Գրասենյակի արտադրողականության լավագույն գործիքները

🤖 Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup    Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar    Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները    Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

Նկարագրություն


Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, 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