[Nhờ giúp đỡ] Làm cách nào để lấy dữ liệu từ sheet này sang sheet khác và lưu lại.

[spywaremagic]

Chào mọi người.

Hiện tại em có nhu cầu làm một file excel kiểu như sau: sheet thứ nhất là form nhập nội dung, sheet thứ 2 là nơi lưu trữ thông tin em vừa nhập ở sheet thứ nhất.

Mỗi lần nhập thông tin thì dữ liệu sẽ được cập nhật vào sheet thứ hai và phải nhập vào dòng mới chứ không ghi đè lên dòng cũ, sau đó tự động save lại sheet thứ 2.

Mong được mọi người giúp đỡ.

 

[nghiaphuc]

Chào mọi người.

Hiện tại em có nhu cầu làm một file excel kiểu như sau: sheet thứ nhất là form nhập nội dung, sheet thứ 2 là nơi lưu trữ thông tin em vừa nhập ở sheet thứ nhất.

Mỗi lần nhập thông tin thì dữ liệu sẽ được cập nhật vào sheet thứ hai và phải nhập vào dòng mới chứ không ghi đè lên dòng cũ, sau đó tự động save lại sheet thứ 2.

Mong được mọi người giúp đỡ.

Bạn dùng code sau nhé:

Sub LuuTT()
    If WorksheetFunction.CountA(Sheet1.[C5:C7]) < 3 Then MsgBox "Chua nhap du thong tin!": Exit Sub
    Sheet2.[B65536].End(xlUp).Offset(1).Resize(, 3) = WorksheetFunction.Transpose(Sheet1.[C5:C7])
    Sheet1.[C5:C7].ClearContents
End Sub