VBA Seçimi - Excel VBA'da Seçim Özelliği nedir? (Örneklerle)

VBA'da, herhangi bir hücre aralığını veya bir hücre grubunu seçebilir ve bunlar üzerinde farklı işlemler gerçekleştirebiliriz; seçim bir aralık nesnesidir, bu nedenle hücreleri tanımlarken ve hücreleri seçmek için kod olarak hücreleri seçmek için aralık yöntemini kullanırız. "Seç" komutu, seçim için kullanılacak sözdizimi aralıktır (A1: B2) .select.

Excel VBA Seçim Özelliği nedir?

Seçim, VBA ile kullanılabilen özelliktir. Hücre aralığı seçildikten sonra, ne yapmamız gerektiğine karar vermemiz gerekir. Bu VBA "Seçim" özelliğini kullanarak seçili hücrelerle yapabileceğimiz her şeyi yapabiliriz. Selection özelliğiyle ilgili sorunlardan biri IntelliSense listesini göremememizdir. Bu yüzden kodu yazarken IntelliSense listesi olmadan ne yaptığımızdan kesinlikle emin olmamız gerekir.

VBA'da Seçim Özelliği Örnekleri

Burada Excel VBA'daki seçim örneklerine bakıyoruz.

Örnek 1

Size VBA ile "seçim" özelliğinin basit bir örneğini göstereyim. Şimdi ilk önce A1'den B5'e kadar olan hücreleri seçmek istiyorum, çünkü VBA kodunu böyle yazabiliriz.

Aralık ( "A1: B5" ). Seçin

Kod:

Alt Seçim_Örnek1 () Aralık ("A1: B5"). Son Alt'ı seçin

Bu kod, A1'den B5'e kadar VBA hücre aralığını seçecektir.

Bu hücrelere "merhaba" değerini eklemek istersem kodu şu şekilde yazabilirim.

Kod:

Alt Seçim_Örnek1 () Aralık ("A1: B5"). Değer = "merhaba" Son Alt

Benzer şekilde, hücreler seçildikten sonra "Seçim" olur .

Kod:

Alt Seçim_Örnek1 () Aralık ("A1: B5"). Seçimi seçin.Value = "Merhaba" Son Alt

İlk önce, A1'den B5'e kadar hücre aralığını seçtim. Yani bu satır hücreleri seçecektir.

Bu hücreler seçildikten sonra, bu hücrelere excel VBA'da "Seçim" özelliğini kullanarak başvurabiliriz. Dolayısıyla Selection özelliğini kullanarak bu hücrelere "Merhaba" değerini ekleyebiliriz.

Bu, VBA'daki "Seçim" özelliğine genel bir bakıştır.

Örnek 2

Şimdi değişkenlerle birlikte VBA "Selection" özelliğini göreceğiz. VBA değişkenini Aralık olarak tanımlayın.

Kod:

Alt Seçim_Örnek2 () Aralık Sonu Alt Olarak Karartma Aralığı

Aralık, bir nesne değişkeni olduğu için bir nesne değişkenidir. "Set" anahtar kelimesini kullanarak hücre aralığını ayarlamamız gerekir.

Aralığı "Aralık (" A1: A6 ") olarak ayarlayacağım .

Kod:

Alt Seçim_Örnek2 () Kısma Aralığı Aralık Olarak Ayarla Aralığı = Aralık ("A1: A6") Son Alt

Şimdi " Rng " değişkeni , A1 ila A6 arasındaki hücre aralığını ifade eder .

Şimdi " Merhaba " değerini eklemek için kodu yazacağım .

Kod:

Alt Seçim_Örnek2 () Kısma Aralığı Aralık Olarak Ayarla Aralığı = Aralık ("A1: A6") Rng.Value = "Merhaba" Son Alt

Bu, "Merhaba" değerini A1 ila A6 arasındaki hücrelere ekleyecektir.

Kodu nerede çalıştırdığınız önemli değildir, etkin çalışma sayfasında A1-A6 hücresine "Merhaba" değerini ekler.

Ancak, hücreleri seçtiğiniz her yere sadece bir tıklama ile "Merhaba" kelimesini eklemeniz gereken durumu hayal edin.

Bunun için belirli bir hücre aralığı ayarlayamayız. Bunun yerine aralığı " Seçim " olarak ayarlamamız gerekiyor .

Kod:

Alt Seçim_Örnek2 () Kısma Aralığı Aralık Olarak Ayarla Aralığı = Seçim Son Alt

Şimdi "Rng" değişkeni, aktif hücreyi veya hücreleri seçtiğimiz yeri ifade eder. Şimdi bu özelliği (Seçim) excel VBA'da kullanarak "Merhaba" değerini ekleyebiliriz.

Kod:

Sub Selection_Example2 () Dim Rng As Range Set Rng = Seçim Selection.Value = "Merhaba" End Sub

Bu, seçimimizin hücrelerine "Merhaba" kelimesini ekleyecektir. Şimdi B2'den C6'ya kadar olan hücreleri seçip kodu çalıştıracağım; "Merhaba" değerini ekleyecektir.

Örnek 3

Şimdi seçilen hücrelerin iç rengini nasıl değiştirebileceğimizi göreceğiz. Şimdi seçeceğim hücrelerin iç rengini değiştirmek istiyorum. Bunun için ilk olarak değişkeni Aralık olarak tanımladım ve aralık referansını "Seçim" olarak ayarladım.

Kod:

Alt Seçim_Örnek3 () Aralık Olarak Karartma Aralığı Aralığı Ayarla = Seçim Son Alt

Şimdi VBA Seçimi özelliğini kullanarak "İç" özelliğine erişim .

Kod:

Sub Selection_Example3 () Dim Rng As Range Set Rng = Seçim Seçimi İç Uç Alt

“İç” mülk seçildikten sonra, bu mülkle ne yapmamız gerektiğine karar vermemiz gerekiyor. Seçili hücrenin iç kısmının rengini değiştirmemiz gerektiğinden, "Renk" özelliğini seçin.

Kod:

Sub Selection_Example3 () Dim Aralığı As Range Set Rng = Seçim Seçimi.Interior.Color End Sub

Color özelliğini " vbGreen " olarak ayarlayın .

Kod:

Sub Selection_Example3 () Dim Aralığı As Range Set Rng = Seçim Selection.Interior.Color = vbGreen End Sub

Bu, seçilen hücrelerin iç rengini "vbGreen" olarak değiştirir.

Bunun gibi kodlamada Excel VBA “Selection” özelliğini kullanabilir ve çok daha fazlasını kolayca yapabiliriz.

Not: "Selection" özelliğiyle ilgili en büyük tehditlerden biri, kodlama sırasında IntelliSense liste erişimini alamıyoruz. Yeni bir öğrenci olarak, Selection özelliğinin tüm özelliklerini ve yöntemlerini hatırlamak neredeyse imkansızdır, bu nedenle "Selection" özelliğini kullanmaya başlamak için VBA'da kesinlikle profesyonel olmanız gerekir.

Ilginç makaleler...