Muốn lấy kết quả từ sheet này sang sheet khác trong VBA (1 người xem)

[dvnhatbao]

Chào cả nhà.
Hiện tại em đang có khó khăn là lấy kết quả SUM từ sheet này sang sheet khác trong VBA nhưng chưa biết cách làm. Trong 1 sheet thì em có thể làm được nhưng giữa 2 sheet khác nhau thì em không làm được.

Đây là code sum trong 1 sheet của em

Set rng_Format = ws_sheet1.Cells(l_LastQueryRow + 1, 12)
  rng_Format.Formula = "=SUM(G" & CStr(l_LastQueryRow + 1) & ":G" & CStr(l_EndQueryRow) & ")"
  If (l_EndQueryRow > (l_LastQueryRow + 1)) Then
    Set rng_Format = ws_DiscountAnalysis.Range(Cells(l_LastQueryRow + 1, 12), Cells(l_EndQueryRow, 12))
    rng_Format.FillDown
  End If

Giờ cũng như thế này mà em lấy kết quả của column 12, trong sheet2 thì em phải làm như thế nào. Mong mọi người giúp đỡ

 

[nhapmon]

code của bạn pro wa, thiệt tình tui ko hiểu. đây là một ví dụ copy từ sheet này sang sheet kia
thí dụ, muốn chép range ("A1:A100") ở sheet1 sang sheet2 ở cộ L (12) như sau
sheets(2).range("L1:L100").value=sheets(1).range("A1:A100").value

 

[dhn46]

Dữ liệu của bạn như thế nào thì cũng phải cung cấp cho người trợ giúp chứ, bạn post 1 dãy code lên thế kia ai biết mặt mũi dữ liệu đâu mà gán.
Không hiểu bạn dùng VBA rồi thì sao lại dùng VBA để gán Function vào cell?