Dán vào các ô chỉ hiển thị trong Excel 2016
Tôi thấy đoạn mã này từ Bob Umlas. Tôi luôn sao chép và dán từ cùng một vùng, vì vậy tôi không cần phần cửa sổ bật lên. Làm thế nào tôi có thể chỉnh sửa mã để nó luôn sao chép từ $B$999:$B$1009 và dán vào $A$1:$A$1000? Sub Copy_Filtered_Cells() Đặt từ = Lựa chọn Đặt too = Application.InputBox("Chọn phạm vi để sao chép các ô đã chọn vào", Type:=8) Đối với mỗi ô trong từ Cell.Copy Đối với mỗi thứ trong đó cũng vậy Nếu chiều cao hàng của toàn bộ hàng lớn hơn 0 thì điều.PasteSpecial Đặt too = thing.Offset(1).Resize(too.Rows.Count) Lối ra Kết thúc nếu Kế tiếp Kế tiếp End Sub Trả lời: Hãy xem những điều sau đây https://answers.microsoft.com/en-us/msoffice/forum/msoffice_excel-mso_other/pasting-into-visible-cells-only/ebec7959-60bd-4903-ad8e-391f2f8d8479 Hi vọng bạn sẽ tìm được giải pháp cho thắc mắc của mình. Trả lời: Tôi đã nhận được câu trả lời này và tôi sẽ thử. phần mã gốc: Đặt từ = Lựa chọn Đặt too = Application.Input...