Loại biến đơn
VBA Duy nhất kiểu dữ liệu được sử dụng để lưu trữ các số yêu cầu vị trí thập phân. Nó có thể lưu trữ từ -3.4028235E + 38 đến -1.401298E-45 cho các giá trị âm và từ 1,401298E-45 đến 3,4028235E + 38 cho các giá trị dương.
Để khai báo một biến Đơn, bạn sử dụng Câu lệnh Dim (viết tắt của Dimension):
| 1 | Dim sngA dưới dạng Đơn |
Sau đó, để gán giá trị cho một biến, chỉ cần sử dụng dấu bằng:
| 1 | sngA = 3658,25 |
Đặt điều này trong một thủ tục trông giống như sau:
| 12345678 | Sub sngExample ()'khai báo biến képDim sngA dưới dạng Đơn'điền biến képsngA = 3658,25'hiển thị hộp tin nhắnMsgBox sngAKết thúc Sub |
Nếu bạn chạy đoạn mã trên, hộp thông báo sau sẽ được hiển thị.
Loại dữ liệu kép
Kiểu dữ liệu Double chỉ là một phiên bản dài hơn của Duy nhất loại dữ liệu. Do thực tế này, nó có thể ảnh hưởng đến việc làm tròn khi được sử dụng trong một quy trình như Duy nhất kiểu dữ liệu sẽ làm tròn đến 4 chữ số thập phân, trong khi Kép Loại dữ liệu sẽ làm tròn đến 12 chữ số thập phân. Nếu bạn cần nhiều hơn 4 chữ số thập phân, bạn có thể sử dụng kiểu dữ liệu Double.
Kiểu dữ liệu Int hoặc Long
Nếu bạn không cần vị trí thập phân, bạn có thể sử dụng kiểu dữ liệu Int hoặc kiểu dữ liệu Dài.
| 1 | Dim intA dưới dạng Số nguyên |
| 1 | Dim lngB as Long |
Lập trình VBA | Code Generator làm việc cho bạn!
Khai báo một biến ở cấp mô-đun hoặc cấp toàn cầu
Trong các ví dụ trước, chúng tôi đã khai báo Duy nhất biến trong một thủ tục. Các biến được khai báo với một thủ tục chỉ có thể được sử dụng trong thủ tục đó.
Thay vào đó, bạn có thể khai báo các biến Đơn ở cấp độ mô-đun hoặc toàn cục.
Cấp độ mô-đun
Cấp mô-đun các biến được khai báo ở đầu mô-đun mã với Lờ mờ tuyên bố.
Các biến này có thể được sử dụng với bất kỳ thủ tục nào trong mô-đun mã đó.
Cấp độ toàn cầu
Cấp độ toàn cầu các biến cũng được khai báo ở đầu mô-đun mã. Tuy nhiên, thay vì sử dụng Lờ mờ tuyên bố, sử dụng Công cộng tuyên bố để chỉ ra rằng Duy nhất biến có sẵn để được sử dụng trong suốt Dự án VBA của bạn.
| 1 | SngA công khai dưới dạng đơn |
Nếu bạn khai báo Duy nhất biến ở cấp độ mô-đun và sau đó cố gắng sử dụng nó trong một mô-đun khác, sẽ xảy ra lỗi.
Tuy nhiên, nếu bạn đã sử dụng từ khóa Public để khai báo Duy nhất biến, lỗi sẽ không xảy ra và thủ tục sẽ chạy hoàn hảo.
Bạn mệt mỏi với việc tìm kiếm ví dụ về mã VBA? Hãy thử AutoMacro!
Định dạng được lưu trữ đơn dưới dạng chuỗi
Có thể có lúc bạn muốn định dạng một kiểu dữ liệu thành một chuỗi - ví dụ: bạn có thể muốn hiển thị một ký hiệu tiền tệ và làm tròn số đến 2 chữ số thập phân.
Để đạt được điều này, bạn sử dụng chức năng Định dạng.
Quy trình sau
| 1234567891011 | Sub TestSingleToCurrencyString ()'khai báo biến chuỗiDim strMoney As String'khai báo đơn và điền giá trịDim sngValue As SinglesngValue = 44055.256'chuyển đổi đơn thành chuỗi có ký hiệu tiền tệ với 2 chữ số thập phânstrMoney = Định dạng (sngValue, "$ #, ## 0,00")'xem kết quảMsgBox strMoneyKết thúc Sub |
sẽ trả về kết quả này:
Tương tự, bạn có thể muốn hiển thị một số dưới dạng số điện thoại được định dạng.
Quy trình này:
| 1234567891011 | Sub TestSingleToPhone ()'khai báo biến chuỗiDim strPhone As String'khai báo đơn và điền giá trịDim sglValue As singlesglValue = 555968541'chuyển đổi đơn thành chuỗi có ký hiệu tiền tệstrPhone = Định dạng (sglValue, "(000) -000 0000")'xem kết quảMsgBox strPhoneKết thúc Sub |
sẽ trả về kết quả này:
