Copy vùng dữ liệu chỉ định sang sheet khác

[soilangbac]

Kính chào các Thầy, các anh/ chị forums www.giaiphapexcel.com,

Em xin trình bày vấn đề cần giúp code như sau:
Em có file excel 2 sheet 1 và 2.
Ở sheet 1:
Nhu cầu cần copy vùng bắt đầu từ dòng A9 (gồm các cột từ A đếnE) đến dòng cuối cùng có dữ liệu.


Ở sheet 2:
Sẽ paste giá trị copy từ sheet 1 sang.Do cột D của sheet 1 dùng câu lệnh nên sẽ paste value sang sheet 2.
Nếu bấm copy tiếp tục thì data sẽ được paste vào line sau line có data ở sheet 2.

Em xin gửi file đính kèm, mong mọi người giúp đỡ.

 

[be_09]

Kính chào các Thầy, các anh/ chị forums www.giaiphapexcel.com,

Em xin trình bày vấn đề cần giúp code như sau:
Em có file excel 2 sheet 1 và 2.
Ở sheet 1:
Nhu cầu cần copy vùng bắt đầu từ dòng A9 (gồm các cột từ A đếnE) đến dòng cuối cùng có dữ liệu.


Ở sheet 2:
Sẽ paste giá trị copy từ sheet 1 sang.Do cột D của sheet 1 dùng câu lệnh nên sẽ paste value sang sheet 2.
Nếu bấm copy tiếp tục thì data sẽ được paste vào line sau line có data ở sheet 2.

Em xin gửi file đính kèm, mong mọi người giúp đỡ.

Sử dụng thử File.

 

[soilangbac]

Sử dụng thử File.

Rất cám ơn anh be09 đã làm giúp, nhưng file download về đang copy tất cả các line từ sheet 1 sang sheet 2.
Anh có thể sửa giúp theo yêu cầu này không?

Em cám ơn nhiều
Ở sheet 1:
Nhu cầu cần copy vùng bắt đầu từ dòng A9 (gồm các cột từ A đếnE) đến dòng cuối cùng có dữ liệu.

 

[be_09]

Rất cám ơn anh be09 đã làm giúp, nhưng file download về đang copy tất cả các line từ sheet 1 sang sheet 2.
Anh có thể sửa giúp theo yêu cầu này không?

Em cám ơn nhiều
Ở sheet 1:
Nhu cầu cần copy vùng bắt đầu từ dòng A9 (gồm các cột từ A đếnE) đến dòng cuối cùng có dữ liệu.

File bài 1 tại Sheet1 dữ liệu bắt đầu từ A2, bạn nêu copy dữ liệu bắt đầu từ dòng A9 là sao tôi không hiểu.
Hay là tiêu đề bắt đầu là A8 nên copy dữ liệu bắt đầu từ dòng A9 trở xuống.

 

[soilangbac]

File bài 1 tại Sheet1 dữ liệu bắt đầu từ A2, bạn nêu copy dữ liệu bắt đầu từ dòng A9 là sao tôi không hiểu.
Hay là tiêu đề bắt đầu là A8 nên copy dữ liệu bắt đầu từ dòng A9 trở xuống.

Dạ ý em là như sau:
Sheet1 em có tiêu đề là dòng A1, data bắt đầu từ dòng A2 đến dòng A16.
Khi làm thao tác copy, em chỉ muốn copy data bắt đầu từ dòng A9 đến dòng cuối cùng (là A16).

Em có phải làm thêm thao tác đánh x các line cần copy không anh?

Nhờ anh giúp.

 

[be_09]

Dạ ý em là như sau:
Sheet1 em có tiêu đề là dòng A1, data bắt đầu từ dòng A2 đến dòng A16.
Khi làm thao tác copy, em chỉ muốn copy data bắt đầu từ dòng A9 đến dòng cuối cùng (là A16).

Em có phải làm thêm thao tác đánh x các line cần copy không anh?

Nhờ anh giúp.

Kiểm tra lại thử.

 

[soilangbac]

Kiểm tra lại thử.

dạ em cám ơn anh, file anh gửi đã đúng yêu cầu của em rồi.

Em biến tấu 1 chút trong file, nhưng copy thì không ra kết quả đúng.
Em gửi anh file excel có note chi tiết bị lỗi gì, anh xem giúp.

Em cám ơn.

 

[befaint]

file

Option Explicit

Sub vidu_copy()
    'luu y: Format cot A sheet 2 la Text truoc
  
    Dim inupt_row As String, start_row As Long
    Dim last_row As Long, arr As Variant
    Dim end_row As Long
  
    inupt_row = InputBox("Nhap dong bat dau copy:", "Cong cu copy/ paste", 13)
    start_row = Val(inupt_row)
    If start_row = 0 Then Exit Sub
  
    With Sheet1
        last_row = .Range("A" & .Rows.Count).End(xlUp).Row
        If start_row > last_row Then
            MsgBox "Dong bat dau phai <= dong cuoi cung co du lieu!"
            Exit Sub
        End If
        arr = .Range("A" & start_row & ":E" & last_row).Value2
    End With
  
    With Sheet2
        end_row = .Range("A" & .Rows.Count).End(xlUp).Row + 1
        .Range("A" & end_row).Resize(UBound(arr, 1), UBound(arr, 2)).Value = arr
    End With
    MsgBox "Done!", vbInformation
End Sub

 

[be_09]

dạ em cám ơn anh, file anh gửi đã đúng yêu cầu của em rồi.

Em biến tấu 1 chút trong file, nhưng copy thì không ra kết quả đúng.
Em gửi anh file excel có note chi tiết bị lỗi gì, anh xem giúp.

Em cám ơn.

1/ Sheet 1 sử dụng hàm điều kiện dựa vào A2, A3, thì Sheet 2 cũng phải dựa vào A2, A3.
2/ Sheet 1 có tiêu đề là dòng 1 (chọn A1), nay có tiêu đề là dòng 5 thì phải sửa code (chọn A5).

 

[soilangbac]

Dạ e làm được rồi, e cám ơn anh @be09 và anh @befaint nhiều nhiều.