Xin Code để thực hiện nhấn nút Copy một vùng từ sheet DS_A sang sheet DS_B (3 người xem)

[Tran Mui]

Tôi con code để thực hiện khi nhấp chuột vào nút copy trong Sheet DS_A một vùng dữ liệu [B5: I96] sang Sheet DS_B vần trong vùng [B5: I96]
Nhờ Gpe giúp đỡ
File Book1 đính kèm
Xin cám ơn

 

[Ếch Xanh]

Bạn biết ghi macro không? Bạn thử ghi lại hành động copy như bạn nói, rồi gán macro đó vào một nút lệnh nhé! Rất dễ dàng bạn ơi.

 

[khoavu87]

Tôi con code để thực hiện khi nhấp chuột vào nút copy trong Sheet DS_A một vùng dữ liệu [B5: I96] sang Sheet DS_B vần trong vùng [B5: I96]
Nhờ Gpe giúp đỡ
File Book1 đính kèm
Xin cám ơn

Thì thế này:

Private Sub CommandButton1_Click()
Range("B5: I96").Copy Sheet5.Range("B5")
End Sub

 

[Ếch Xanh]

Thôi để tôi làm luôn CODE cho bạn nhé!
Theo tôi, bạn nên copy nguyên bảng Danh sách học sinh hơn là một phần của nó. Code của tôi bạn có thể Update bảng danh sách tại Sheets("DS_A"), thêm tên hoặc bớt tên đều ổn, code sẽ copy tất cả và paste vào Sheets("DS_B") cho bạn.

Sub CopyVung()
  With Sheets("DS_B")
    .Range("A4:I65536").Clear
    Sheets("DS_A").Range("A4:I" & Sheets("DS_A").Range("A65536").End(xlUp).Row).Copy .Range("A4")
  End With
End Sub