Bagaimana cara mengekspor grafik ke grafik di Excel?

Di Excel, terkadang, Anda dapat membuat beberapa bagan dari data, sehingga datanya terlihat lebih visual dan langsung. Jika Anda ingin menyimpan atau mengekspor grafik ke grafik untuk beberapa tujuan, bagaimana Anda bisa melakukannya?

Ekspor grafik ke grafik dengan kode VBA

Ekspor beberapa grafik / gambar / bentuk ke grafik dengan Kutools for Excel

Ekspor grafik ke grafik dengan kode VBA

Kode VBA berikut dapat membantu Anda mengekspor bagan yang dipilih dari lembar kerja aktif sebagai gambar. Dan gambar akan disimpan di lokasi yang sama dengan buku kerja yang Anda terapkan. Lakukan sebagai berikut:

1. Pilih grafik yang ingin Anda ekspor.

2. Kemudian Tahan ALT + F11 kunci, dan itu membuka Microsoft Visual Basic untuk Aplikasi jendela.

3. Klik Menyisipkan > Modul, dan tempel kode berikut di Module Window.

VBA: Ekspor grafik ke 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. Lalu tekan F5 kunci untuk menjalankan kode ini, dan masukkan nama untuk grafik yang diekspor di kotak prompt, lihat tangkapan layar:

5. Dan kemudian klik OK, bagan yang dipilih telah diekspor ke gif format, dan disimpan di lokasi yang sama dengan file aslinya. Lihat tangkapan layar:

Dengan kode VBA di atas, Anda hanya dapat mengekspor satu grafik dalam satu waktu, jika Anda ingin mengekspor grafik lain, pilih grafik lain terlebih dahulu, lalu ekspor dengan kode.

Ekspor beberapa grafik / gambar / bentuk ke grafik dengan Kutools for Excel

Kutools untuk Excel'S Ekspor Grafik utilitas dapat mengekspor beberapa bagan, gambar, atau bentuk sekaligus di Excel.

Setelah menginstal Kutools for Excel, lakukan seperti di bawah ini :(Unduh Gratis Kutools untuk Excel Sekarang!)

1. Klik Kutools Ditambah > Ekspor Impor > Ekspor Grafik, lihat tangkapan layar:

2. di Ekspor Grafik kotak dialog, semua Grafik, gambar dan bentuk telah terdaftar di kotak daftar kiri, tentukan jenis yang ingin Anda ekspor, lalu klik  untuk menentukan direktori untuk menyimpan grafik yang diekspor, pada saat yang sama, Anda dapat memilih format gambar dari format Ekspor yang Anda butuhkan, seperti GIF, JPEG, TIF or PNG.

3. Lalu klik OK, semua bagan, gambar, dan bentuk telah berhasil diekspor ke lokasi yang ditentukan. Lihat tangkapan layar:

;

Silahkan klik Ekspor Grafik untuk mengetahui lebih lanjut tentang fitur ini.

  Ekspor Grafik

Ketik.Jika Anda ingin mengekspor berbagai konten dari buku kerja ke file independen, silakan coba gunakan Kutools for Excel's Ekspor Rentang ke File seperti yang ditunjukkan pada tangkapan layar berikut. Ini berfungsi penuh tanpa batasan dalam 60 hari, silakan unduh dan dapatkan uji coba gratis sekarang.

Alat Produktivitas Kantor Terbaik

🤖	Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
	Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
	Pencarian Super: VLookup Beberapa Kriteria  |   VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
	Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
	Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
	Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar   |  Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel   |  Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
	15 Perangkat Teratas:  12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

Read More ... Download Gratis...

---

Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

• Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
• Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
• Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!

Read More ... Download Gratis...