Em cần giúp về code nhập số liệu giữa 2 bảng (1 người xem)

[lohado]

kính gửi thầy cô , anh chị và các bạn.
em cần nhập số lượng hàng trong "lịch giao hàng" sang dòng "Delivered" trong bảng theo dõi theo đúng từng ngày trong tháng.
Em gửi file đính kèm. mong thầy cô , anh chị và các bạn giúp đỡ sớm

 

[lohado]

Ạnh chị thày cô nào giúp e với đi ạ. có hướng giải quyết như thế nào cũng nói cho e biết với ạ

 

[Ba Tê]

kính gửi thầy cô , anh chị và các bạn.
em cần nhập số lượng hàng trong "lịch giao hàng" sang dòng "Delivered" trong bảng theo dõi theo đúng từng ngày trong tháng.
Em gửi file đính kèm. mong thầy cô , anh chị và các bạn giúp đỡ sớm

Hướng là:
Bạn dùng Excel mà khoái Merge cells thì chỉ để trang trí cho đẹp thôi. Code chạy gặp mấy cái "mẹt" là nó "ghét" hông nhìn mặt.
Tôi tạo thêm một cột khác (cột A) không "mẹt" để chạy code, bạn không cần cột này thì ẩn đi.
Nếu thêm dữ liệu trong cột B thì bạn cũng nhớ cho cột A một cái gì đó để nó tìm.
Hic!

 

[lohado]

Hướng là:
Bạn dùng Excel mà khoái Merge cells thì chỉ để trang trí cho đẹp thôi. Code chạy gặp mấy cái "mẹt" là nó "ghét" hông nhìn mặt.
Tôi tạo thêm một cột khác (cột A) không "mẹt" để chạy code, bạn không cần cột này thì ẩn đi.
Nếu thêm dữ liệu trong cột B thì bạn cũng nhớ cho cột A một cái gì đó để nó tìm.
Hic!

Cảm ơn bạn đã trả lời.:d
Hóa ra code nó ghét Merge cells. Từ giờ mình sẽ không dùng nó nữa )
Bạn ơi , - cái code này chép sang bảng khác có chạy đúng không hay phải sửa chỗ nào??

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim C As Long, R As Long, Rng As Range, Cll As Range, DK As String
If Target.Column > 2 And Target.Rows.Count = 1 Then
    C = Target.Column + 2: R = Target.Row: DK = Cells(R, 2).Value
    With Sheets("BangTheoDoi")
        Set Rng = .Range(.[A7], .[A65000].End(xlUp))
        For Each Cll In Rng
            If Cll.Value = DK Then
                Cll.Offset(6, C).Value = Target.Value
                Exit For
            End If
        Next
    End With
End If
End Sub

- Mình muốn mỗi khi có cái lịch giao hàng mới, chỉ cần cop bảng lịch đấy vào đúng sheet" lịch giao hàng" thì dữ liệu cũ tại dòng "Delivered" bị xóa và dữ liệu mới tự động chạy sang dòng "Delivered" tại " bang theo doi" có được không???. hay bạn cho 1 cái nút ấn giấu đâu đó cũng được :d