Sao chép hàng giữa các bảng tính dựa trên giá trị văn bản (Microsoft Excel)
Marian tự hỏi liệu có cách nào để sao chép toàn bộ hàng từ trang tính này sang trang tính khác dựa trên sự xuất hiện của một giá trị văn bản cụ thể (“có”) trong cột E của hàng hay không. Vlookup dường như không hoạt động cho loại đánh giá này.
Nếu bạn chỉ cần thực hiện loại tác vụ này một cách không thường xuyên, thì bạn có thể chỉ cần sử dụng khả năng lọc của Excel. Bật bộ lọc và lọc dữ liệu của bạn để nó chỉ hiển thị các hàng có “có” trong cột E. Sao chép các hàng hiển thị và dán chúng vào bất kỳ trang tính nào bạn muốn.
Nếu bạn phải thực hiện tác vụ thường xuyên hơn, bạn có thể tạo macro để thực hiện việc sao chép nhanh chóng. Macro sau đây kiểm tra 1.000 hàng đầu tiên của Sheet1 và sao chép sang Sheet2 bất kỳ hàng nào có chứa “có” trong cột E.
Sub CopyYes() Dim c As Range Dim j As Integer Dim Source As Worksheet Dim Target As Worksheet ' Change worksheet designations as needed Set Source = ActiveWorkbook.Worksheets("Sheet1") Set Target = ActiveWorkbook.Worksheets("Sheet2") J = 1 ' Start copying to row 1 in target sheet For Each c In Source.Range("E1:E1000") ' Do 1000 rows If c = "yes" Then Source.Rows(c.Row).Copy Target.Rows(j) j = j + 1 End If Next c End Sub
Lưu ý rằng macro sẽ ghi đè lên bất kỳ thông tin nào đã có trên Sheet2. Nó cũng không phải là “động”, nghĩa là nếu các giá trị trong cột E thay đổi và bạn muốn các hàng trong Sheet2 phản ánh những thay đổi đó, thì macro sẽ không giúp được gì.
Bạn có thể tìm thêm thông tin về việc tự động sao chép thông tin từ trang tính này sang trang tính khác trên trang web này:
https://www.mrexcel.com/forum/excel-questions/602635- automatically-move-entire-rows-one-worksheet-into- another-worksheet-same-workbook.html
Mặc dù URL được hiển thị trên ba dòng ở đây, tất cả đều là một URL duy nhất. Bạn sẽ muốn đảm bảo rằng bạn đưa tất cả vào trình duyệt của mình.
_Lưu ý: _
Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.
ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.
Mẹo này (13399) áp dụng cho Microsoft Excel 2007, 2010, 2013, 2016, 2019 và Excel trong Office 365.