Dán vào Tập dữ liệu đã lọc - Mẹo Excel

Joe hỏi liệu có cách nào để thực hiện thao tác dán đã lọc trong Excel không.

Giả sử bạn có 1000 bản ghi trên Sheet1. Bạn lọc tập dữ liệu đó để chỉ hiển thị cho bạn các bản ghi có ProdID = Z. Chọn tập dữ liệu và dán vào Sheet2. Đặc biệt, Excel chỉ mang lại các bản ghi hiển thị, vì vậy bạn có một khối ô liền kề. Có lẽ bạn thực hiện một số chuyển đổi đối với các bản ghi đó và bây giờ bạn cần dán nó trở lại tập dữ liệu ban đầu. Excel KHÔNG cung cấp bất kỳ cách dễ dàng nào để thực hiện việc này. Macro trong video này sẽ hỗ trợ quá trình. Tôi đã ghi Học Excel Podcast tập 977 hiển thị macro để trợ giúp thực hiện hành động này. Tại đây, bạn sẽ tìm thấy video và mã được sử dụng trong sổ làm việc Excel.

Xem video

Sao chép mã này

Tôi đã điều chỉnh mã từ video một chút. Điều này giả định rằng bạn sẽ sao chép hàng tiêu đề và các bản ghi đã lọc từ Sheet1 sang Sheet2:

Sub PasteBack() ' Assumes the Filterered Sheet1 is active Set DataToCopy = Sheet2.Range("A1").CurrentRegion n = 2 ' index for range to copy from Sheet2 one row at a time, skipping headers For i = 2 To Cells(Rows.Count, 1).End(xlUp).Row ' row 1 is header If Not Rows(i).Hidden Then DataToCopy.Offset(n - 1).Resize(1).Copy Cells(i, 1) n = n + 1 If n> DataToCopy.Rows.Count Then Exit Sub End If Next i End Sub

Một giải pháp không có macro

Sau khi video đầu tiên được phát sóng, Gary đã gửi một giải pháp mới bằng cách sử dụng Paste Skip Blanks. Xem video đó tại đây:.

thú vị bài viết...