Copy Khi Filter Dòng Bằng VBA | Giải Pháp Excel

• Trang chủ Có gì mới Hoạt động gần nhất Tác giả
• Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
• Video Video về Excel Video về tin học khác Tin tức về tin học chung
• Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
• Tài nguyên Đánh giá mới nhất Tìm tài nguyên
• Facebook
• Đóng góp

Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

Tìm kiếm

Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Bởi: Tìm kiếm Tìm nâng cao…

• Tìm bài viết mới
• Tìm theo chuyên mục

Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

Follow along with the video below to see how to install our site as a web app on your home screen.

Note: This feature may not be available in some browsers.

• Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc

• Trang chủ
• Diễn đàn
• Những vấn đề chung

You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Copy khi filter dòng bằng VBA (1 người xem)

• Thread starter Thread starter tranphuson
• Ngày gửi Ngày gửi 8/3/21

Người dùng đang xem chủ đề này

Đang trực tuyến: 2 (Thành viên: 0, Khách: 2) T

tranphuson

Thành viên thường trực

Tham gia 14/8/09 Bài viết 268 Được thích 10 Giới tính Nam Mình có 1 file sau khi filter dòng sau đó copy dữ liệu đã được filter lên phía trên bằng VBA: Dữ liệu ở Sheet "Pivot" cần copy từ Cột A, I, J, K, L, M, N, O, P => Copy lên dòng số 3 phía trên Xin cảm ơn

File đính kèm

• Đơn hàng.xlsx Đơn hàng.xlsx 25.9 KB · Đọc: 5

Hoàng Trọng Nghĩa

Chuyên gia GPE

Thành viên BQT Moderator Tham gia 17/8/08 Bài viết 8,662 Được thích 16,727 Giới tính Nam Cho hỏi là nó luôn luôn có 8 mã thôi hả bạn? T

tranphuson

Thành viên thường trực

Tham gia 14/8/09 Bài viết 268 Được thích 10 Giới tính Nam

Hoàng Trọng Nghĩa đã viết: Cho hỏi là nó luôn luôn có 8 mã thôi hả bạn? Nhấp chuột vào đây để mở rộng...

Tạm thời là 8 mã như vậy, nếu sau này có thêm thì mình chỉnh sửa sau. Cảm ơn

Hoàng Trọng Nghĩa

Chuyên gia GPE

Thành viên BQT Moderator Tham gia 17/8/08 Bài viết 8,662 Được thích 16,727 Giới tính Nam

tranphuson đã viết: Tạm thời là 8 mã như vậy, nếu sau này có thêm thì mình chỉnh sửa sau. Cảm ơn Nhấp chuột vào đây để mở rộng...

Nếu nhiều hơn VD là 20 mã đi, khi paste nó sẽ lấn vào cái Pivot tạo ra lỗi hoặc mất dữ liệu sao bạn? Lẽ ra bạn phải để cái Pivot ở một sheet và cái bảng phía trên ở một sheet mới an toàn chứ? T

tranphuson

Thành viên thường trực

Tham gia 14/8/09 Bài viết 268 Được thích 10 Giới tính Nam

Hoàng Trọng Nghĩa đã viết: Nếu nhiều hơn VD là 20 mã đi, khi paste nó sẽ lấn vào cái Pivot tạo ra lỗi hoặc mất dữ liệu sao bạn? Lẽ ra bạn phải để cái Pivot ở một sheet và cái bảng phía trên ở một sheet mới an toàn chứ? Nhấp chuột vào đây để mở rộng...

Hiểu ý bạn nói. Nhưng yêu cầu của kế toán cần làm trước vậy. Vui lòng giúp mình trước 8 mã này. Cảm ơn

Hoàng Trọng Nghĩa

Chuyên gia GPE

Thành viên BQT Moderator Tham gia 17/8/08 Bài viết 8,662 Được thích 16,727 Giới tính Nam

tranphuson đã viết: Hiểu ý bạn nói. Nhưng yêu cầu của kế toán cần làm trước vậy. Vui lòng giúp mình trước 8 mã này. Cảm ơn Nhấp chuột vào đây để mở rộng...

Nếu chỉ có vậy thì code sẽ đơn giản thế này: Mã: Sao chép. Sub CopyPasteValue() Range("A24:A93,I24:P93").Copy Range("A3").PasteSpecial Paste:=xlPasteValues End Sub T

tranphuson

Thành viên thường trực

Tham gia 14/8/09 Bài viết 268 Được thích 10 Giới tính Nam

Hoàng Trọng Nghĩa đã viết: Nếu chỉ có vậy thì code sẽ đơn giản thế này: Mã: Sao chép. Sub CopyPasteValue() Range("A24:A93,I24:P93").Copy Range("A3").PasteSpecial Paste:=xlPasteValues End Sub Nhấp chuột vào đây để mở rộng...

Nếu mà khi filter dòng bên dưới thay đổi thì mình có cách nào copy không cần phải xác định dòng (Range("A24:A93,I2493").Copy) Vì dữ liệu có thể thay đổi về dòng khi nhưng vẫn là 8 mã này có mã con thì filter total sẽ không cố định dòng. Cảm ơn

be_09

Biên Hòa, Đồng Nai

Tham gia 9/4/11 Bài viết 9,972 Được thích 9,884 Nghề nghiệp Công chức

tranphuson đã viết: Nếu mà khi filter dòng bên dưới thay đổi thì mình có cách nào copy không cần phải xác định dòng (Range("A24:A93,I2493").Copy) Vì dữ liệu có thể thay đổi về dòng khi nhưng vẫn là 8 mã này có mã con thì filter total sẽ không cố định dòng. Cảm ơn Nhấp chuột vào đây để mở rộng...

Thử code sau: Mã: Sao chép. Sub Dung_Copy() Dim DongCuoi As Long DongCuoi = Cells(Rows.Count, 1).End(xlUp).Row Union(Range("A15:A" & DongCuoi), Range("I15:P" & DongCuoi)).Copy Range("A2") End Sub T

tranphuson

Thành viên thường trực

Tham gia 14/8/09 Bài viết 268 Được thích 10 Giới tính Nam

be_09 đã viết: Thử code sau: Mã: Sao chép. Sub Dung_Copy() Dim DongCuoi As Long DongCuoi = Cells(Rows.Count, 1).End(xlUp).Row Union(Range("A15:A" & DongCuoi), Range("I15:P" & DongCuoi)).Copy Range("A2") End Sub Nhấp chuột vào đây để mở rộng...

Cảm ơn bạn đã hỗ trợ T

tranphuson

Thành viên thường trực

Tham gia 14/8/09 Bài viết 268 Được thích 10 Giới tính Nam

be_09 đã viết: Thử code sau: Mã: Sao chép. Sub Dung_Copy() Dim DongCuoi As Long DongCuoi = Cells(Rows.Count, 1).End(xlUp).Row Union(Range("A15:A" & DongCuoi), Range("I15:P" & DongCuoi)).Copy Range("A2") End Sub Nhấp chuột vào đây để mở rộng...

Cho mình hỏi thêm nếu copy thêm qua Sheet "Sum" thì phải chỉnh VBA này như thế nào?

Hoàng Trọng Nghĩa

Chuyên gia GPE

Thành viên BQT Moderator Tham gia 17/8/08 Bài viết 8,662 Được thích 16,727 Giới tính Nam

tranphuson đã viết: Cho mình hỏi thêm nếu copy thêm qua Sheet "Sum" thì phải chỉnh VBA này như thế nào? Nhấp chuột vào đây để mở rộng...

Bạn muốn sheet nào cũng được, sửa tại đây: Union(Range("A15:A" & DongCuoi), Range("I15" & DongCuoi)).Copy Sheets("Sum").Range("A2") T

tranphuson

Thành viên thường trực

Tham gia 14/8/09 Bài viết 268 Được thích 10 Giới tính Nam

Hoàng Trọng Nghĩa đã viết: Bạn muốn sheet nào cũng được, sửa tại đây: Union(Range("A15:A" & DongCuoi), Range("I15" & DongCuoi)).Copy Sheets("Sum").Range("A2") Nhấp chuột vào đây để mở rộng...

Cảm ơn bạn đã giúp T

tranquynh.81

Thành viên mới

Tham gia 21/1/21 Bài viết 11 Được thích 3 Mình có 1 file có 3 sheet (dc, kd,md) , mình muốn copy các dòng từ sheet kd và md sang sheet dc . vì mình copy từng lần lâu quá khoảng 15000 dòng . mong các bạn giúp đỡ . Mình có gửi file cảm ơn .

File đính kèm

• DC+md+kd 15.8.21 (HOI VBA).xlsx DC+md+kd 15.8.21 (HOI VBA).xlsx 318.4 KB · Đọc: 5

Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

Bài viết mới nhất

• Đã giải quyết

FitRowXL v1.3 - Giãn dòng tự động và bổ trợ in ấn Excel (*01/2026 mới) (3 người xem)

• • 
  • 

• HeSanbi
• 18/4/21
• Lập Trình với Excel

Trả lời 74 Đọc 30K 58 phút trước HeSanbi Copilot bình luận các ván cờ vua từng ngày. (2 người xem)

• • 

• SA_DQ
• 3/11/25
• Chia sẻ

Trả lời 61 Đọc 2K Hôm nay lúc 04:52 SA_DQ E Giúp Đặt tên lại (Rename) cho hàng loạt các file PDF theo cùng 1 quy tắc (3 người xem)

• Excel my love_1
• 15/4/23
• Tin học mở rộng

Trả lời 4 Đọc 4K Hôm qua, lúc 15:20 luongha.ktqd L L Thu Chi Gia Đình (2 người xem)

• • 

• lehang0812
• Thứ năm lúc 17:12
• TPHCM

Trả lời 3 Đọc 104 Hôm qua, lúc 02:59 son193 S

• Question Question

Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba (3 người xem)

• • 
  • 
  • 

• ongke0711
• 6/10/24
• Lập Trình với Excel

5 6 7 Trả lời 622 Đọc 91K Thứ năm lúc 16:11 LOGANWover L

• Question Question

Chia sẻ một thuật toán đơn giản để trộn cells (2 người xem)

• • 
  • 

• Quang_Hải
• Thứ tư lúc 10:14
• Lập Trình với Excel

Trả lời 12 Đọc 302 Thứ năm lúc 11:13 Quang_Hải TaxCode v4.33 - Tra cứu mã số thuế từ tổng cục thuế, masothue và thuvienphapluat (2 người xem)

• • 
  • 

• HeSanbi
• 27/11/25
• Các Add-ins cho excel

Trả lời 19 Đọc 3K Thứ năm lúc 08:54 HeSanbi

• Question Question

Tạo Add-in, tệp Excel, Word, Access tự động cập nhật phiên bản mới từ Cloud cho chính nó (2 người xem)

• • 
  • 

• HeSanbi
• Thứ hai lúc 20:14
• Lập Trình với Excel

Trả lời 1 Đọc 211 Thứ tư lúc 17:03 HeSanbi Hàm EXACT (2 người xem)

• • 

• TranThanhPhong
• 30/4/14
• Dự án: Công thức & Hàm 97-2019

Trả lời 3 Đọc 9K Thứ ba lúc 15:52 ptm0412 Add-Ins cho Excel 2007 -2016 32bit và 64bit (3 người xem)

• • 
  • 
  • 

• giaiphap
• 8/8/15
• Các Add-ins cho excel

4 5 6 Trả lời 518 Đọc 226K Thứ ba lúc 14:17 Gà Công Nghệ V Một Excel add-in vibe coding (2 người xem)

• • 

• vietdang170
• 28/1/26
• Các Add-ins cho excel

Trả lời 18 Đọc 699 Thứ ba lúc 11:10 vietdang170 V H Xin giúp đặt điều kiện trong Conditional Formating (2 người xem)

• hoanglocphat
• Thứ hai lúc 14:23
• Hỏi đáp những vấn đề khác

Trả lời 6 Đọc 184 Thứ ba lúc 10:13 Gà Con yêu VBA

• Dán lên cao

Phiên bản mới Add-in A-Tools AI v10 (2024) (1 người xem)

• • 

• Nguyễn Duy Tuân
• 13/9/24
• BLUESOFTS: A-Excel, A-Tools

Trả lời 61 Đọc 12K Thứ hai lúc 15:13 Nguyễn Duy Tuân Xin giúp hàm excel để tìm 1 số trong số có 2 chữ số (2 người xem)

• mrjun80
• 31/1/26
• Hàm và công thức Excel

Trả lời 4 Đọc 182 Chủ nhật lúc 08:38 Gà Con yêu VBA N Vấn đề về hiệu năng khi thực hiện ghép chuỗi trong VBA với tần suất lớn (2 người xem)

• • 
  • 

• nguyendang95
• 23/1/26
• Excel và các ngôn ngữ lập trình khác

Trả lời 36 Đọc 1K 31/1/26 ptm0412

• Question Question

Tra cứu thông tin mã số thuế (cập nhật lại code cũ) (2 người xem)

• • 
  • 
  • 

• ongke0711
• 24/7/25
• Lập Trình với Excel

Trả lời 16 Đọc 2K 31/1/26 tuyethao T VNFastSearch – DLL tìm kiếm tiếng Việt tốc độ cao cho Excel VBA (2 người xem)

• phuongnam366377
• 31/1/26
• Excel và các ngôn ngữ lập trình khác

Trả lời 0 Đọc 160 31/1/26 phuongnam366377 N

• Question Question

Tạo khung viền ô theo số trong ô (1 người xem)

• • 

• Nguyễn Xuân Sơn
• 29/1/26
• Lập Trình với Excel

Trả lời 9 Đọc 256 31/1/26 Mr.hieudoanxd J Đừng chỉ "Cập nhật" dữ liệu. Hãy "Xếp chồng" chúng lên. (1 người xem)

• • 

• jack nt
• 29/1/26
• Excel và các ngôn ngữ lập trình khác

Trả lời 5 Đọc 300 31/1/26 ptm0412 T gửi email đến nhân viên công ty (2 người xem)

• tuantv9
• 26/1/26
• Excel và các ngôn ngữ lập trình khác

Trả lời 2 Đọc 273 30/1/26 nguyendang95 N Xem thêm… Chia sẻ: Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

Thành viên có số lượng bài viết cao nhất tháng

• HeSanbi 12
• chothadiem 8
• Gà Công Nghệ 5
• Officexinh 4
• vietdang170 4
• pycckuu410 3
• HieuCD 3
• chiendich 3
• hoanglocphat 3
• VietHoangPhan 2
• DeTong 2
• Gà Con yêu VBA 2
• Quang_Hải 2
• linhdao2909 1
• HUONGHCKT 1
• vuvannguyen1972 1
• Phuocam 1
• ptm0412 1
• LOGANWover 1
• luongha.ktqd 1

Thành viên có điểm tương tác cao nhất tháng

• HeSanbi 16
• Quang_Hải 7
• vietdang170 5
• Gà Con yêu VBA 4
• pycckuu410 3
• chiendich 3
• DeTong 3
• Phuocam 3
• Officexinh 2
• HUONGHCKT 2
• HieuCD 2

Thời gian đếm ngược.

000 Ngày 00 Giờ 00 phút 00 giây Thân mời tham dự sự kiện sinh nhật GPE 2025

• Trang chủ
• Diễn đàn
• Những vấn đề chung

• Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…

Back Top Bottom