Vba kullanılarak bölmeler nasıl dondurulur (örneklerle)

Bir Excel çalışma sayfasındaki belirli bölmeleri dondurmak için VBA’da aşağıdaki sözdizimini kullanabilirsiniz:

 Sub FreezeCertainPanes()

With ActiveWindow
    If .FreezePanes Then .FreezePanes = False
    .SplitColumn = 0
    .SplitRow = 1
    .FreezePanes = True
End With

End Sub

.SplitColumn bağımsız değişkeni dondurulacak sütun sayısını (soldan başlayarak) belirtir.

.SplitRow bağımsız değişkeni dondurulacak satır sayısını (üstten başlayarak) belirtir.

Bu özel makro, Excel sayfasının yalnızca ilk satırını dondurur.

Aşağıdaki örnekler, bu sözdiziminin pratikte aşağıdaki Excel sayfasıyla nasıl kullanılacağını gösterir:

Örnek 1: VBA kullanarak ilk satırı dondurma

Excel sayfasının ilk satırını dondurmak için aşağıdaki makroyu oluşturabiliriz:

 Sub FreezeCertainPanes()

With ActiveWindow
    If .FreezePanes Then .FreezePanes = False
    .SplitColumn = 0
    .SplitRow = 1
    .FreezePanes = True
End With

End Sub

Bu makro yürütüldüğünde sayfanın ilk satırı donar:

Ne kadar kaydırırsak kaydıralım ilk satır görünür durumda kalacaktır.

Örnek 2: VBA kullanarak ilk sütunu dondurma

Excel sayfasının ilk satırını dondurmak için aşağıdaki makroyu oluşturabiliriz:

 Sub FreezeCertainPanes()

With ActiveWindow
    If .FreezePanes Then .FreezePanes = False
    .SplitColumn = 1
    .SplitRow = 0
    .FreezePanes = True
End With

End Sub

Bu makro yürütüldüğünde sayfanın ilk sütunu donar:

Kat edilen mesafeye bakılmaksızın ilk sütun görünür kalacaktır.

Örnek 3: VBA kullanarak belirli satırları ve sütunları dondurma

Excel sayfasının ilk 3 satırını ve ilk 2 sütununu dondurmak için aşağıdaki makroyu oluşturabiliriz:

 Sub FreezeCertainPanes()

With ActiveWindow
    If .FreezePanes Then .FreezePanes = False
    .SplitColumn = 2
    .SplitRow = 3
    .FreezePanes = True
End With

End Sub

Bu makro çalıştırıldığında sayfanın ilk 3 satırı ve ilk 2 sütunu dondurulur:

Kat edilen mesafeye bakılmaksızın ilk 3 sıra ve ilk 2 sütun görünür kalacaktır.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: Son kullanılan satırı nasıl bulabilirim?
VBA: Son kullanılan sütun nasıl bulunur?
VBA: birden fazla satır nasıl eklenir