Nhờ các thầy giúp em Userform đổi số ra chữ ạ (2 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

minhhahdvn

Thành viên mới
Tham gia
13/12/12
Bài viết
10
Được thích
1
Em có Userform TextBox 1 là Số tiền bằng số, TextBox2 là Số tiền bằng chữ. Em có down trên mạng được một Sub đổi số ra chữ em có để ở Moudel 1. Công thức của nó khi viết trên Sheet sẽ là doiso(giatri). Bây giờ em muốn khi nhập số tiền bằng số ở Textbox1 thì nó hiện ra luôn ở Textbox2 để mình kiểm tra, sau đó thì điền lần lượt 2 giá trị này vào ô A2 và B2. Em mong các thầy giúp đỡ
 

File đính kèm

Em có Userform TextBox 1 là Số tiền bằng số, TextBox2 là Số tiền bằng chữ. Em có down trên mạng được một Sub đổi số ra chữ em có để ở Moudel 1. Công thức của nó khi viết trên Sheet sẽ là doiso(giatri). Bây giờ em muốn khi nhập số tiền bằng số ở Textbox1 thì nó hiện ra luôn ở Textbox2 để mình kiểm tra, sau đó thì điền lần lượt 2 giá trị này vào ô A2 và B2
Bạn thử như thế này xem
Mã:
Private Sub TextBox1_Change()
    With Me
        .TextBox2 = docso(Val(Me.TextBox1))
    End With
End Sub
Lưu ý là Hàm của bạn là docso chứ không phải là doiso
 
Cám ơn bác, cái này đúng chuẩn luôn rồi ạ. Thanks bác nhiều lắm. Em mới nên chắc chưa có nút thanks, bác thông cảm nhé
 
Tiện đây các thầy cho em hỏi là trong UserForm chỉ tạo được tối đa 2 Page ở phần Mutil Page thôi ạ? Em muốn nhiều hơn nữa có được không?
 
Tiện đây các thầy cho em hỏi là trong UserForm chỉ tạo được tối đa 2 Page ở phần Mutil Page thôi ạ? Em muốn nhiều hơn nữa có được không?
Bạn không nên chen ngang bài viết của người khác (vì vấn đề bạn nêu không liên quan đến tiêu đề và nội dung bài viết).

Muốn hỏi về MultiPage thì mở Topic khác, nên đặt vấn đề cụ thể đồng thời phải đính kèm File để các thành viên đọc và hiểu mới có thể giúp bạn, hình đính kèm là 1 kiểu MultiPage.
MultiPage.JPG
 
Web KT

Bài viết mới nhất

Back
Top Bottom