Vba: adlandırılmış bir aralığa nasıl başvurulur

VBA’da adlandırılmış bir aralığa başvuruda bulunmak için, adlandırılmış aralığın çift tırnak içine alındığı Range() işlevini kullanmanız yeterlidir.

Örneğin, Teams adlı adlandırılmış aralıktaki her değere “Takım” değerini atamak için aşağıdaki makroyu oluşturabilirsiniz:

 SubModifyNamedRange ()
 
Range("teams").Value = "Team"

End Sub

Aşağıdaki örnek, bu sözdiziminin pratikte nasıl kullanılacağını gösterir.

Örnek: VBA Kullanarak Adlandırılmış Bir Aralığa Nasıl Başvurulur?

Diyelim ki Excel’de belirli bir sayfada A2:A11 aralığını temsil eden Teams adında adlandırılmış bir aralığımız var:

Bu adlandırılmış aralıktaki her hücreye bir “Takım” metin değeri atamak için aşağıdaki makroyu oluşturabiliriz:

 SubModifyNamedRange ()

Range("teams").Value = "Team"

End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Adlandırılmış aralığımızdaki her hücrenin artık orijinal takım adı yerine “Takım” ifadesini içerdiğine dikkat edin.

Ayrıca aralık adı verilen takımlardaki her hücreye 100’lük sayısal bir değer atamak için aşağıdaki makroyu da kullanabiliriz:

 SubModifyNamedRange ()

Range("teams").Value = 100

End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Veya adlandırılmış aralık takımlarındaki her hücrenin kalın yazı tipine ve yeşil arka plan rengine sahip olmasını sağlamak için aşağıdaki makroyu bile kullanabiliriz:

 SubModifyNamedRange ()

Range("teams").Interior.Color = vbGreen
Range("teams").Font.Bold = True

End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Adlandırılmış plaj ekiplerinin her hücresi artık kalın bir yazı tipine ve yeşil arka plan rengine sahip.

Ek kaynaklar

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

VBA: adlandırılmış bir aralığın nasıl silineceği
VBA: Görünür satırlar başka bir sayfaya nasıl kopyalanır
VBA: satırları kriterlere göre başka bir sayfaya kopyalayın