Microsoft Excel, verileri filtrelemenize izin verir. Büyük miktarda veriyi anlamanıza yardımcı olabilecek kullanışlı bir özelliktir. Bir veritabanı oluşturmak için gerekli teknik bilgi birikiminiz yoksa, bu özellik bir hayat kurtarıcıdır. Filtreler oldukça basit ve bir sütuna veri eklemenizi veya hariç tutmanızı sağlar. Filtre, karşılık gelen satırlardaki veri değerlerine uzanır ve uygulanır. Filtrenin yapmadığı şey kendini otomatik güncellemedir. Filtrelenmiş bir sütundaki bir değer değişirse, onu el ile güncellediğinizden veya bir formül kullanımda olduğundan, filtreleri yeniden uygulamanız gerekir. Basit bir kod pasajı, anında filtrelenmiş sütunları güncellemenizi sağlar.
Makroları etkinleştirmeniz ve kaydetmeniz gerekir.Makro etkin bir dosya olarak Excel dosyası, .XLSM, kodu kullanmak için. Dosyayı makro etkin bir dosya olarak kaydetmek için, Dosya> Farklı Kaydet seçeneğine gidin ve "Farklı Kaydet" iletişim kutusundan Excel Makro Etkin Çalışma Kitabı'nı seçin.
Ardından, filtreler uyguladığınız sayfayı seçin. Sağ tıklayın ve içerik menüsünden "Kodu görüntüle" yi seçin.
Geçerli Excel sayfasını içeren bir Microsoft Visual Basic penceresi açılacaktır. Aşağıdaki kodu kod penceresine yapıştırın.
Private Sub Worksheet_Change(ByVal Target As Range)
If Me.FilterMode = True Then
With Application
.EnableEvents = False
.ScreenUpdating = False
End With
With ActiveWorkbook
.CustomViews.Add ViewName:="Mine", RowColSettings:=True
Me.AutoFilterMode = False
.CustomViews("Mine").Show
.CustomViews("Mine").Delete
End With
With Application
.EnableEvents = True
.ScreenUpdating = True
End With
End If
End Sub
Dosya 'yı kaydet. Dosyayı bir Excel Makro Etkin Çalışma Kitabı olarak kaydetmediyseniz, tekrar yapmanız istenir. Kaydettiğiniz bu dosya bir kopya olarak kaydedilir ve geçerli dosyanın üzerine yazılmaz.
Kod eklendikten sonra, filtrelenmiş bir sütundaki herhangi bir hücreyi güncelleyebilirsiniz; filtre, ayarladığınız koşullara göre otomatik olarak yenilenir. Bu kod Stack Exchange kullanıcısı Sorin tarafından yazılmıştır.
Yorumlar