Kiểu là một câu lệnh trong VBA được sử dụng để xác định các biến tương tự như hàm DIM, nó được sử dụng ở cấp do người dùng xác định nơi chúng ta có một hoặc nhiều giá trị trong một biến, tuy nhiên, có hai danh pháp cho câu lệnh kiểu là công khai hoặc riêng tư chúng là tùy chọn để sử dụng, nhưng tên biến và tên phần tử là bắt buộc.
Câu lệnh kiểu trong Excel VBA là gì?
Câu lệnh kiểu VBA được sử dụng để xác định các biến dưới một tên nhóm duy nhất với các kiểu dữ liệu khác nhau được gán cho mỗi biến. Điều này giúp chúng ta nhóm nhiều biến lại với nhau trong một đối tượng để sử dụng chúng dưới tên kiểu đã xác định.
Bằng cách khai báo câu lệnh Type, chúng ta có thể tránh sử dụng mô-đun Lớp trong VBA. Nó không cần bất kỳ mô-đun chuỗi nào vì nó có thể được nhúng vào các mô-đun đã có sẵn, điều này có thể giúp chúng ta tiết kiệm không gian.
Trong một trong những bài viết trước, chúng ta đã thảo luận về “VBA ENUM” để nhóm tất cả các biến lại với nhau dưới tên nhóm duy nhất.
Ví dụ: nếu bạn có tên nhóm là “Điện thoại di động”, chúng tôi có các thành viên nhóm như “Redmi, Oppo, Vivo, Samsung, LG, v.v.” Vì vậy, tuyên bố Enum chúng ta có thể nhóm lại với nhau bằng các giá trị tương ứng của chúng.
Enum Mobiles
Redmi = 12000
Oppo = 18000
Vivo = 18000
Samsung = 25000
LG = 15000
Kết thúc Enum
Như thế này, chúng tôi đã tạo bảng liệt kê trong bài viết đó. Vấn đề với câu lệnh Enum vì nó chỉ có thể chứa một kiểu dữ liệu LONG. Để nhóm các biến có kiểu dữ liệu khác nhau lại với nhau, chúng ta có thể sử dụng “Câu lệnh kiểu VBA”. Trong bài viết này, chúng tôi sẽ hướng dẫn bạn cách tạo một câu lệnh Type trong VBA. Đọc tiếp…
Cú pháp
Trước khi bạn khai báo các biến bằng cách sử dụng câu lệnh Type, hãy xem cú pháp:
Nhập Tên nhóm (Biến 1) làm Kiểu dữ liệu biến (Biến 2) làm Kiểu dữ liệu biến (Biến 3) làm Kiểu dữ liệu biến (Biến 4) làm Kiểu dữ liệu biến (Biến 5) làm Kiểu dữ liệu biến Loại cuối
Các loại câu lệnh này có thể được khai báo trong mô-đun cũng như ở đầu mô-đun, giống như Biến toàn cục của chúng tôi trong VBA.
VBA Type có thể chứa các biến đối tượng. Nó có thể chứa các mảng. Tuy nhiên, nó không thể chứa các thủ tục, hàm.
Ví dụ về loại câu lệnh trong VBA
Ok, hãy bắt đầu quá trình khai báo biến với câu lệnh Type. Chúng ta sẽ thấy cùng một ví dụ về việc khai báo các thương hiệu Di động giống như cách chúng ta đã sử dụng trong VBA Enum.
Bước 1: Ở đầu mô-đun, bắt đầu từ “Loại” và đặt tên cho Loại nhóm.
Mã:
Nhập Loại Kết thúc Thương hiệu Di động
Bước 2: Trong Mobile Brands, những thứ chúng ta thường thấy là gì. Đầu tiên chúng ta thấy Name nên khai báo biến là Name as String.
Mã:
Nhập Tên thương mại di động làm Loại kết thúc chuỗi
Bước 3: Sau tên, chúng ta kiểm tra Ngày ra mắt. Khai báo biến là LaunchDate as Date.
Mã:
Nhập Tên thương mại Di động làm Chuỗi khởi chạy Ngày làm Ngày kết thúc Loại
Bước 4: Việc tiếp theo là chúng ta kiểm tra Dung lượng lưu trữ. Để khai báo biến là Storage as Integer.
Mã:
Nhập tên MobileBrands làm chuỗi khởi chạy Ngày lưu trữ làm loại kết thúc số nguyên
Bước 5: Việc tiếp theo là chúng ta kiểm tra dung lượng RAM.
Mã:
Nhập tên MobileBrands làm chuỗi khởi chạy Ngày lưu trữ theo ngày Lưu trữ dưới dạng RAM là loại kết thúc số nguyên
Bước 6: Cuối cùng, chúng tôi kiểm tra về Giá.
Mã:
Loại MobileBrands Name As String LaunchDate As Date Storage As Integer RAM As Integer Price As Long End Type
Bây giờ trong Sub Thủ tục bằng cách khai báo biến là Type, Name, tức là MobileBrands, chúng ta có thể truy cập tất cả các kiểu dữ liệu biến này.
Step 7: Create a subprocedure.
Code:
Sub Type_Example1() End Sub
Step 8: Now declare the variable “Mobile” as MobileBrnads.
Code:
Sub Type_Example1() Dim Mobile As Mob End Sub
Step 9: Now, with the variable name “Mobile,” we can access all the variables of “MobileBrands.”
Code:
Step 10: Now store each value like the below.
Code:
Type MobileBrands Name As String LaunchDate As Date Storage As Integer RAM As Integer Price As Long End Type Sub Type_Example1() Dim Mobile As MobileBrands Mobile.Name = "Redmi" Mobile.LaunchDate = "10-Jan-2019" Mobile.Storage = 62 Mobile.RAM = 6 Mobile.Price = 16500 MsgBox Mobile.Name & vbNewLine & Mobile.LaunchDate & vbNewLine & _ Mobile.Storage & vbNewLine & Mobile.RAM & vbNewLine & Mobile.Price End Sub
Finally, show the result in a VBA message box like the below one.
Code:
Sub Type_Example1() Dim Mobile As MobileBrands Mobile.Name = "Redmi" Mobile.LaunchDate = "10-Jan-2019" Mobile.Storage = 62 Mobile.RAM = 6 Mobile.Price = 16500 MsgBox Mobile.Name & vbNewLine & Mobile.LaunchDate & vbNewLine & _ Mobile.Storage & vbNewLine & Mobile.RAM & vbNewLine & Mobile.Price End Sub
Now run the code using the F5 key or manually and see the result in a message box.
Like this, we can use the “VBA Type” statement to define new data types in the subprocedure.
VBA Types vs. VBA Class
VBA Type is often compared to VBA Class modules. There are certain differences between them. Below are the common differences.
- Sự khác biệt 1: Kiểu VBA chỉ có thể chứa các biến Công khai. VBA Class có thể chứa cả biến Public và Private.
- Sự khác biệt 2: Loại VBA không thể chứa Thủ tục và Hàm. VBA Class chứa cả hai cùng với các thuộc tính.
- Sự khác biệt 3: Loại VBA có thể được khai báo trong bất kỳ mô-đun và thủ tục nào. Lớp VBA chỉ có thể được khai báo trong mô-đun lớp dành riêng.
