Nhờ viết code cho form nhập hàng, xuất hàng

[quykh]

Chào cả nhà! Em có viết một chương trình bằng VBA, nhưng tới phần viết code và thủ tục thì Em viết không được, mong các Bác xem file đính kèm viết dùm em. Em cám ơn các bác nhiều.

 

[SA_DQ]

Vạn sự khởi đầu nan!

Chí ít fải là thế này bạn à:

Private Sub CMDCAPNHAT_Click()
 With S01.[A65500].End(xlUp).Offset(1)
      .Value = TXTMAHANG
      .Offset(, 1).Value = TXTTENHANG
      .Offset(, 2).Value = TXTDVT  '<=|'
      MsgBox "Da Xong!"
      TXTMAHANG = ""
      TXTTENHANG = ""
      TXTDVT = ""
  End With
End Sub

Chú í nhỏ là tên TextBox thứ 3 đang có vấn đề, cần sửa lại để khớp nhau với câu lệnh.

 

[quykh]

Bạn viết dùm mình code cho form nhập hàng,xuất hàng và các combo bõ nhé