Ví dụ:
Dim sinhvien(1 To 5) As String
sinhvien(1) = "Tí"
sinhvien(2) = "Tèo"
sinhvien(3) = "Tô"
sinhvien(4) = "Tun"
sinhvien(5) = "Tôp"
MsgBox "Xin chào " & sinhvien(4)
Ví dụ trên khai báo mảng sinh viên có 05 phần tử và lần lượt gán giá trị từng phần tử.Cuối cùng xuất ra màn hình phần tử thứ 4.
Dim sinhvien(1 To 5, 1 To 2) As String
Dim i, j As Integer
For i = 1 To 5
For j = 1 To 2
sinhvien(i, j) = Cells(i, j).Value
Next j
Next i
MsgBox "Xin chào " & sinhvien(4, 1) & " hoc lop: " & sinhvien(4, 2)
Ví dụ trên tạo ra mảng 02 chiều sinhvien(5 dòng,2 cột)
Lần lượt lấy các giá trị A1:B5 gán vào phần tử mảng=> xuất ra màn hình phần tử (4,1) và (4,2)
3.Dùng hàm Array()
Đối với mảng chứa dữ liệu bất kỳ ta dùng hàm Array()
Ví dụ:
Dim sinhvien
sinhvien = Array("Tèo", 2, "Tô", "Tun", "Tôp")
Dim i As Integer
For i = 0 To 4
MsgBox "Xin chào " & sinhvien(i)
Next i
Giá trị cuả mảng bắt đầu từ 0 (cái này có thể đổi được)
Dim sinhvien
sinhvien = Array("Tèo", 2, "Tô", "Tun", "Tôp")
Dim i As Integer
For i = 0 To 4
MsgBox "Xin chào " & sinhvien(i)
Next i
ReDim sinhvien(2)
For i = 0 To 1
sinhvien(i) = i
Next i
MsgBox sinhvien(1)
Chú ý: khi dùng Redim=> giá trị các phần tử sẽ bị xóa sạch.(muốn giữ lại giá trị thì dùng: Redim Preserve tenmang(15)
Lbound(tenmang)
Ubound(tenmang)
Nếu vẫn chưa hiểu các bạn xem trong video clip:
Ngoài ra còn các hàm Erase,IsArray,…các bạn tìm trong liên kết bên dưới
https://msdn.microsoft.com/vi-vn/vba/language-reference-vba/articles/arrays-keyword-summary
Tác giả: #drM
Bài 06: Làm chữ nghệ thuật, chữ đầu đoạn văn
Tin học văn phòng - Excel – Bài 03 – Các phép tính cơ bản
Tin học văn phòng – Excel – Bài 09 – Vẽ biểu đồ
Tin học văn phòng – OUTLOOK - Bài 01 – Giới thiệu và cài đặt mail POP3 vs IMAP
Tin học văn phòng – OUTLOOK - Bài 04 – Tạo và quản lý contacts
Tin học văn phòng – OUTLOOK - Bài 05 – Quản lý email
Tin học văn phòng – POWERPOINT – Bài 01 – Tạo và quản lý slide
Tin học văn phòng – POWERPOINT – Bài 03 – Hiệu ứng cho đối tượng