Gán giá trị cho ô (cell) trong VBA Excel

1. Cách gán giá trị cell trong VBA Excel
   • * Gán giá trị theo vào ô bằng địa chỉ
   • * Giá giá trị theo vị trí cột và dòng
   • * Gán trị trị nhiều ô với lệnh vba
     
   • * Gán giá trị ô với biến kiểu chữ
   • * Gán giá trị ô với biến kiểu số
   • * Gán giá trị sang 1 sheet khác
2. Lấy giá trị của ô ra 1 biến vba excel
   • * Biến Variant là kiểu biến dành cho tất cả các kiểu
   • * Biến String là kiểu biến dành cho kiểu chữ
   • * Biến Double số thập phần

1. Cách gán giá trị cell trong VBA Excel

* Gán giá trị theo vào ô bằng địa chỉ

Gán giá trị số 1 vào ô A1
 Range("A2").Value = "Gia tri"  ' giá tri la chữ
 Range("A3").Value = 10 ' Giá trị là số

* Giá giá trị theo vị trí cột và dòng

Gán giá trị số 1 vào dòng 2 cột 1
Cells(2,1).Value = "Gia tri"
 
* Đó là giá trị con số, nếu gán giá trị vào ô kiểu chữ ta thêm dấu " 2 bên
Cells(2,1).Value = "Hoc vba excel cung iif"

* Gán trị trị nhiều ô với lệnh vba

Range("A1:A5").Value = "Toi la vba iif"
*Kết quả từ dòng 1 đến dòng 5 cột A được gán Toi la vba iif 

Range("B1:B5").Value = 5
*Kết quả từ dòng 1 đến dòng 5 cột B được gán số 5

* Gán giá trị ô với biến kiểu chữ

Dim strText as String
strText = "String of Text"
Range("A2").Value = strText

* Gán giá trị ô với biến kiểu số

Dim so_A as int
so_A = 100
Range("B2").Value = so_A

* Gán giá trị sang 1 sheet khác

  Worksheets("Sheet2").Range("A1").Value = "Lap trinh vba"
  Worksheets("Sheet3").Cells(2, 1).Value = 889

2. Lấy giá trị của ô ra 1 biến vba excel

 - Biến Variant là kiểu biến dành cho tất cả các kiểu

Dim var as Variant
var = Range("A1").Value

 - Biến String là kiểu biến dành cho kiểu chữ

Dim var as String
var = Range("A1").Value

 - Biến Double số thập phần

Dim var as Double
var = Range("A1").Value
Range("A1").Value = Range("B1").Value
Range("A1:A5").Value = Range("B1:B5").Value
MsgBox Range("A1").Value = Range("B1").Value

Tìm kiếm: