Excel'de grafikleri görsel olarak nasıl dışa aktarabilirsiniz?
Excel'de verilerden bazen grafikler oluşturabilirsiniz; böylece veriler daha görsel ve anlaşılır hale gelir. Belirli bir amaçla grafikleri kaydetmek veya dışa aktarmak istiyorsanız bunu nasıl yapabilirsiniz?
Grafikleri VBA koduyla görsellere dışa aktarma
Birden fazla grafiği/resmi/şekli Kutools for Excel ile görsellere dışa aktarma ![]()
Grafikleri VBA koduyla görsellere dışa aktarma
Aşağıdaki VBA kodu, etkin çalışma sayfasındaki seçili grafiği resim olarak dışa aktarmanıza olanak tanır. Resim, bulunduğunuz çalışma kitabının kayıtlı olduğu klasöre kaydedilir. Aşağıdaki adımları izleyin:
1. Dışa aktarmak istediğiniz grafiği seçin.
2. Ardından ALT + F11 tuşlarına basılı tutun; bu işlem, Microsoft Visual Basic for Applications penceresini açar.
3. Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül Penceresine yapıştırın.
VBA: Grafiği görsel olarak dışa aktarma
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. Ardından, kodu çalıştırmak için F5 tuşuna basın ve istem kutusunda dışa aktarılan grafiğe bir ad verin; ekran görüntüsüne bakın:

5. Ardından Tamam düğmesine tıklayın; seçilen grafik Gif biçiminde dışa aktarılmış ve orijinal dosyanın bulunduğu konuma kaydedilmiştir. Ekran görüntüsüne bakın:

Yukarıdaki VBA koduyla aynı anda yalnızca bir grafiği dışa aktarabilirsiniz. Başka grafikleri dışa aktarmak istiyorsanız, lütfen önce ilgili grafiği seçin ve ardından kodla dışa aktarın.
Birden fazla grafiği/resmi/şekli Kutools for Excel ile görsellere dışa aktarma
Kutools for Excel’nin Grafik Dışa Aktar aracı, Excel'de birden fazla grafiği, resmi veya şekli aynı anda dışa aktarmanıza olanak tanır.
Kutools for Excel'i yükledikten sonra lütfen aşağıdaki adımları izleyin:()Kutools for Excel, şimdi ücretsiz indirin!)Şimdi Kutools for Excel'i Ücretsiz İndirin!
1.KUTOOLS PLUS>İçe/Dışa Aktar>Grafik Dışa Aktarseçeneğine tıklayın; ekran görüntüsüne bakın:

2. Grafik Dışa Aktar iletişim kutusunda, sol listede tüm grafikler, resimler ve şekiller listelenir. Dışa aktarmak istediğiniz türü seçtikten sonra, grafikleri kaydetmek üzere bir dizin belirtmek için
düğmesine tıklayın. Ayrıca, ihtiyaçlarınıza göre Dışa Aktarma formatı menüsünden resim biçimini seçebilirsiniz; örneğin GIF, JPEG, TIF veya PNG.

3. Ardından Tamam düğmesine tıklayın; tüm grafikler, resimler ve şekiller belirtilen konuma başarıyla dışa aktarılmış olacaktır. Ekran görüntülerine bakın:
![]() |
![]() |
Demo: Grafik Dışa Aktar
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar

