Çalışma Kitabındaki Tüm Özet Tablolar Yenilensin


Tüm çalışma kitabındaki Özet Tabloları/Pivot Table yenileyebileceğimiz iki farklı kod göstereceğim.

1.

Sub refresh()

ThisWorkbook.RefreshAll

End Sub

 

Yukarıdaki kod Excel’in eski versiyonlarında çalışmayabilir. Tüm excel versiyonlarında da kullanabileceğimiz kod ise:

2.

Sub refresh2()

Dim pvt As PivotTable

Dim sht As Worksheet

For Each sht In ActiveWorkbook.Sheets

For Each pvt In sht.PivotTables

pvt.RefreshTable

Next pvt

Next sht

End Sub

3.

Kod dışında kullanabileceğiniz ve çalışma kitabındaki tüm kaynakları yenileyen komut ise Menu, Data (Veri) sekmesi altındaki Refresh All buttonu.
refreshall

Reklamlar

Çalışma Kitabı (Workbook) Kodları


  1. Çalışma kitabının ismi ve bulunduğu dosya yolu
  2. Yeni bir çalışma kitabı oluşturmak
  3. Çalışma kitabını kaydedip kapatmak
  4. Açık olan tüm çalışma kitaplarındaki değişiklikleri kaydetmek
  5. Var olan bir çalışma kitabını bulunduğu dosyadan açmak
  6. Yeni oluşturulan çalışma kitaplarını sırayla isimlendirip dosyaya kaydetmek

1.Çalışma kitabının ismi ve bulunduğu dosya yolu


Sub wrkbk()

Dim isim As String

Dim dosyaYol As String

Dim tumisim As String

isim = ActiveWorkbook.Name

dosyaYol = ActiveWorkbook.Path

tumisim = ActiveWorkbook.FullName

MsgBox isim & vbNewLine & dosyaYol & vbNewLine & tumisim

End Sub

2016-05-08 20_26_17-Microsoft Excel - excel_workbook_functionsDevamı »

Çalışma Sayfası (Worksheet) Kodları


  1. Çalışma kitabına yeni sayfa ekleme
  2. Sayfaya isim verme
  3. Sayfaların konumunu belirlemek
  4. Çalışma kitabında kaç tane sayfa olduğunu bulmak

Bu konuda yeni açtığımız çalışma kitabına sayfa ekleme, sayfaların konumunu belirleme, isimlendirme ve sayfa sayısını hesaplama gibi VBA kodları üzerinde duracağız.

Öncelikle boş bir çalışma kitabı açalım. Eski sürümlerde excel sayfa1,sayfa2,sayfa3 olmak üzere 3 sayfayı size hazır getirecektir, 2013 sürümünde ise  yalnızca sayfa1 geliyor olacak. Şimdi eski sürümü kullananlar diğer 2 sayfayı silsin, Sayfa1 (ingilizce kullananlar icin sheet1) üzerinden çalışmaya başlayalım.

worksheet1

1.Çalışma kitabına yeni sayfa ekleme – Worksheets.Add

İlk olarak yeni bir sayfa ekleyeceğimiz kodu yazalım:


Sub sayfaekle()

Worksheets.Add

End Sub

Kodu çalıştırdım ve sola doğru yeni bir sayfa eklendi.

worksheet.addDevamı »

Auto_Open Auto_Close Prosedürleri


EXCEL DOSYASI AÇILIRKEN VE YA KAPANIRKEN OTOMATİK OLARAK YAPTIRMAK İSTEDİĞİMİZ İŞLEMLER İÇİN ÇEŞİTLİ KODLAR

Auto_Open ve Auto_Close excel çalışma kitabını açarken  ya da kapatırken yaptırmak istediğimiz işlemleri yazacağımız prosedürlerdir.

Bu işlemler neler olabilir? :

  1. Çalışma kitabı açıldığında kullanıcıya mesaj gösterelim.
  2. Çalışma kitabı hangi sayfadan kapanırsa kapansın belirlediğimiz sayfadan açılsın.
  3. UserForm ekranda açılsın.
  4. Active X denetimlerini çalıştıralım, Combo Box ı dolduralım.
  5. Yazdığımız özel bir kod çalışsın, örneğin çalışma kitabı kaç defa açıldı saydıralım.
  6. Çalışma kitabı kapanırken kullanıcıya mesaj gösterelim.

Tüm prosedürler için izleyeceğimiz temel yol ise aşağıdaki gibi:

1.Yeni bir excel çalışma kitabı açalım

2. Alt + F11 ya da geliştiricisi sekmesi, Visual Basic komutu ile kod sayfasına geçelim

3. Insert modül ile kodları yazacağımız yeni bir modül ekleyelim

Auto Open:


Sub auto_open()

'** tum kodlarimizi bu kod blogu arasina yazacagiz*

End Sub

Auto Close:


Sub auto_close()

'** tum kodlarimizi bu kod blogu arasina yazacagiz*

End Sub

4. Çalışma kitabımızı Macro Enabled Workbook olarak kaydedip kapatalım.Devamı »