Nhờ anh chị giúp đoạn code cho form nhập dữ liệu.

[vietthanhbk]

Em mới tập tành vào VBA nhưng làm hoài không biết làm sao cho nó chạy được, em nhờ anh chị trong giải pháp làm giúp được không ah! hoặc làm cho em vài ví dụ cũng được ! Thanks anh chị nhiều

 

[sealand]

Hôm nay mạn phép tham gia nha (Khi mới tham gia GPE mình vẫn coi Boyxin là thày về công thức đấy)
Bạn bỏ đi các đoạn lòng vòng và thử như thế này xem (Mấy ô tuổi,MAC TT.v.v... mình chịu không biết lấy công thức ở đâu nên bỏ)

Sub NhapLieu()
Dim i As Integer, Cl As Range, mg()
    mg = Array(1, 5, 6, 7, 8, 2, 3, 9, 10, 14, 15)
    Set Cl = Sheet2.[a65536].End(xlUp).Offset(2)
    Cl = Int((Cl.Row - 2) / 2)
For i = 1 To 11
    Cl.Offset(, mg(i - 1)).Value = Sheet1.Cells(i + 2, 2).Value
 Next
 Sheet1.[B3:B13].ClearContents
 Sheet1.[B3].Select
End Sub

 

[boyxin]

Khi mới tham gia GPE mình vẫn coi Boyxin là thày về công thức đấy

Oái oái oạch oạch oạch

gì mà ghê thế

Học
học nữa
học mãi mà

giống như chữa ký của ai đó thôi

Không biết thì hỏi, muốn giỏi phải học.

 

[vietthanhbk]

Anh em GPE cho em hoi 1 ty nửa nha! Bây giờ em muốn nếu Mà Khi nhập vào Xí nghiệp là 1 thì sẽ tự động lấy dữ liệu điền vào sheet " Bảng Tổng Hợp XN1" và tương tự cho Xí nghiệp 2 và 3 thí viết như thế nào?

 

[vietthanhbk]

Anh Chị GPE có thể cho em 1 ví dụ gần giống với Form của em không ?( Em muốn chuyển thành Form cho đẹp )