maiemveanhnhe
Thành viên chính thức


- Tham gia
- 13/1/11
- Bài viết
- 87
- Được thích
- 7
userform.show
Mong được sự giúp đở của các bác. Trân thành cảm ơn
Cũng đề tài này, Thay vì VD của NH_DK thì còn thấy Code ít nhất cũng nhìn nó được, còn cái này sao không thấy mà vẫn hoạt động được vậy. Câu lệnh của nó là gì vậy các bác. Cảm ơn.
Private Sub CommandButton1_Click()
TextBox3 = Val(TextBox1) + Val(TextBox2)
TextBox3 = Format(TextBox3, "#,##0.000")
End Sub
Private Sub CommandButton2_Click()
TextBox3 = Val(TextBox1) - Val(TextBox2)
TextBox3 = Format(TextBox3, "#,##0.000")
End Sub
Private Sub CommandButton3_Click()
TextBox3 = Val(TextBox1) * Val(TextBox2)
TextBox3 = Format(TextBox3, "#,##0.000")
End Sub
Private Sub CommandButton4_Click()
If TextBox2 = "" Or Val(TextBox2) = 0 Then
MsgBox "Ban phai nhap so vao TextBox2", , "Thông báo": TextBox2.SetFocus: Exit Sub
Else
TextBox3 = Val(TextBox1) / Val(TextBox2)
End If
TextBox3 = Format(TextBox3, "#,##0.000")
End Sub
Private Sub CommandButton5_Click()
TextBox1 = "": TextBox2 = "": TextBox3 = ""
TextBox1.SetFocus
End Sub
Vào đâu mà xem được vậy anh. Alt+f11 --> module mở sao không thấy . cái này nữa nè. Hay là do máy của em có vấn đề. Em đang bò bò và mò mò vào VBA chỉ em chi tiết chút. Cảm ơn.
Để viết code thì vào giao diện VBA (bằng tổ hợp phím Alt+F11). Sau đó :
1/ Muốn viết code cho sheet thì bạn nhấp đúp chuột lên tên Sheet
2/ Muốn viết code cho Module thì bạn click phải chọn Insert / Module
3/ Muốn viết code cho Form thì bạn click phải chọn Insert / UserForm / click phải lên Form, chọn View Codes
và làm theo cách của anh NH_DK (click phải chuột vào các đối tượng và chọn View Code).vẫn không thấy code viết như thế nào nữa. Vậy mà anh NH_DK thấy được. Mình thật sự tại sao như vậy nữa. Mong được sự chỉ giúp tiếp tục. Xin đừng cười nha.