Làm thế nào để định dạng một hộp văn bản dưới dạng tiền tệ trong Excel?
Thông thường, không có chức năng cài sẵn nào trong Excel để bạn thay đổi định dạng văn bản trong hộp văn bản (Điều khiển ActiveX). Tuy nhiên, nếu bạn cần định dạng các số bạn đã nhập vào hộp văn bản thành tiền tệ cho một số mục đích. Bạn có thể làm như thế nào để đạt được nó? Bài viết này sẽ chỉ cho bạn một phương pháp VBA để giải quyết vấn đề này.
Định dạng hộp văn bản dưới dạng tiền tệ với mã VBA
Định dạng hộp văn bản dưới dạng tiền tệ với mã VBA
Mã VBA dưới đây có thể giúp bạn dễ dàng định dạng các số trong hộp văn bản dưới dạng tiền tệ trong Excel. Hãy làm như sau.
1. nhấp chuột Nhà phát triển > Chèn > Hộp văn bản (Điều khiển ActiveX) để chèn một hộp văn bản vào trang tính. Xem ảnh chụp màn hình:
2. Nhấp chuột phải vào hộp văn bản, sau đó nhấp vào Mã Chế độ xem từ menu chuột phải.
3. Trong phần mở đầu Microsoft Visual Basic cho các ứng dụng , vui lòng thay thế mã gốc trong cửa sổ Mã bằng mã VBA bên dưới.
Mã VBA: định dạng hộp văn bản làm đơn vị tiền tệ trong Excel
Private Sub TextBox1_Change()
TextBox1.Value = Format(TextBox1.Value, "$###,##")
End Sub
Chú thích: Trong mã, Hộp văn bản1 là tên của hộp văn bản mà bạn sẽ định dạng các số bên trong dưới dạng tiền tệ. Vui lòng thay đổi nó thành của riêng bạn.
4. Nhấn nút Khác + Q các phím đồng thời để đóng Microsoft Visual Basic cho các ứng dụng cửa sổ.
5. Tắt Chế độ thiết kế.
Kể từ bây giờ, khi nhập một số vào hộp văn bản, nó sẽ tự động được định dạng thành tiền tệ như hình minh họa bên dưới.
Các bài liên quan:
- Làm cách nào để tự động chọn văn bản của hộp văn bản khi nó được chọn trong Excel?
- Làm cách nào để tự động hoàn thành hộp văn bản khi nhập trong Excel?
- Làm thế nào để định dạng một hộp văn bản dưới dạng phần trăm trong Excel?
- Làm cách nào để nối văn bản của nhiều ô vào một hộp văn bản trong Excel?
- Làm cách nào để tắt tính năng chỉnh sửa trong hộp văn bản để ngăn người dùng nhập vào Excel?
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!