Vba: bir değişkendeki bir hücrenin değeri nasıl okunur

Bir hücre değerini bir değişkene okumak için VBA’da aşağıdaki sözdizimini kullanabilirsiniz:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal

End Sub

Bu özel makro, CellVal adında bir dize değişkeni oluşturur ve ardından o anda etkin olan sayfanın A1 hücresinin değerini değişkene okur.

Son olarak bu değişkenin değerini bir mesaj kutusunda görüntülemek için MsgBox’ı kullanıyoruz.

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

Örnek: VBA’da bir değişkendeki bir hücrenin değeri nasıl okunur?

A1 hücresinde 500 değerine sahip bir Excel sayfamız olduğunu varsayalım:

Bu hücre değerini bir değişkene okumak ve ardından değeri bir mesaj kutusunda görüntülemek için aşağıdaki makroyu oluşturabiliriz:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal

End Sub

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

Makro, A1 hücresindeki 500 değerini içeren değişkenin değerini görüntüler.

İsterseniz değişkeni kullanarak daha karmaşık hesaplamalar da yapabileceğimizi unutmayın.

Örneğin, A1 hücresinin değerini bir değişkene okumak için aşağıdaki makroyu oluşturabilir ve ardından bu değeri 5 ile çarparak görüntüleyen bir mesaj kutusu oluşturabiliriz:

 Sub ReadCellValueIntoVar()

Dim CellVal As String
CellVal = Range(" A1 ")

MsgBox CellVal * 5

End Sub

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

Makro, değişkenin değerini 5 ile çarparak görüntüler ve sonuç 500 * 5 = 2500 olur.

Ek kaynaklar

Aşağıdaki eğitimlerde VBA’da diğer yaygın işlemlerin nasıl gerçekleştirileceği açıklanmaktadır:

VBA: Başka bir sayfada bir hücrenin değeri nasıl ayarlanır
VBA: Başka bir sayfadan bir hücrenin değeri nasıl alınır
VBA: Etkin bir hücrede bir aralık nasıl seçilir