Vba: cara membaca nilai sel dalam suatu variabel

Anda dapat menggunakan sintaks berikut di VBA untuk membaca nilai sel ke dalam variabel:

 Sub ReadCellValueIntoVar()

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

MsgBox CellVal

End Sub

Makro khusus ini membuat variabel string yang disebut CellVal dan kemudian membaca nilai sel A1 dari lembar yang sedang aktif ke dalam variabel.

Terakhir, kami menggunakan MsgBox untuk menampilkan nilai variabel ini di kotak pesan.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Cara membaca nilai sel pada suatu variabel di VBA

Misalkan kita memiliki lembar Excel dengan nilai 500 di sel A1 :

Kita bisa membuat makro berikut untuk membaca nilai sel ini menjadi variabel dan kemudian menampilkan nilainya di kotak pesan:

 Sub ReadCellValueIntoVar()

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

MsgBox CellVal

End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Makro menampilkan nilai variabel, yang berisi nilai 500 dari sel A1 .

Perhatikan bahwa kita juga dapat melakukan penghitungan yang lebih kompleks menggunakan variabel jika kita mau.

Misalnya, kita bisa membuat makro berikut untuk membaca nilai sel A1 menjadi variabel, lalu membuat kotak pesan yang menampilkan nilai tersebut dikalikan 5:

 Sub ReadCellValueIntoVar()

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

MsgBox CellVal * 5

End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Makro menampilkan nilai variabel dikalikan 5, yang hasilnya adalah 500 * 5 = 2500 .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan operasi umum lainnya di VBA:

VBA: Cara mengatur nilai sel di lembar lain
VBA: Cara mendapatkan nilai sel dari sheet lain
VBA: Cara memilih rentang di sel aktif