Tạo một danh sách xác thực thay đổi theo sự lựa chọn từ một danh sách khác nhờ VBA

[bigsale001]

Để các bạn hiểu rõ hơn đề tài, mình xin sơ lược như sau:

Giả dụ chung ta có 1 CSDL (cơ sở dữ liệu) về mua/bán hàng trong năm;
Gồm có nhiều trường, trong đó có trường ngày tháng năm thực hiện việc mua/bán hàng;
Trường này cở khoảng 300 dòng hay không ít hơn.
Tiếp theo, ở ô nào đó trên trang tính, như [C1] ta có danh sách lựa chọn 1 trong 4 quí
Ta muốn rằng khi chọn 1 quý nào đó, như quí II; thì ô [E1] sẽ có danh sách đổ xuống của tất cả các ngày trong quí này có trong CSDL;

Chuyện này có thể làm bằng công thức (hàm) của excel, nhưng khá vất vã!

Thêm nữa, nếu ổ [E1] ta chọn 1 ngày cụ thể nào đó trong quí, coi như ngày bắt đầu để khảo sát dữ liệu, thì ô [E3] dưới nó sẽ cho ta 1 danh sách chọn từ ngày bắt đầu (ở [E1] ta đã chọn) đến ngày cuối quí

Các bạn có thể thắc mác: Làm chi vậy?
Xin thưa, ta cần khảo sát dữ liệu trong kỳ (như tuần, mươi ngày, tháng) để tổng hợp bào cáo cho Sếp

Chuyện này trong tầm tay với vài dòng lệnh tương đối đơn giản trong 1 macro sự kiện

Xin các bạn xem trong file đính kèm sẽ rõ hơn.

View more random threads:

• Căn đều dữ liệu bảng khi thay đổi số lượng các ô
• Cần hỗ trợ code VBA
• Ai biet lam cai cai nay khong
• (Đưa bài dùm 1 bạn): Làm sao khi mở file (hay trang tính nào đó của file) là hàm dưới đây chạy ngay
• xin giúp nhập nhanh điểm lẻ trong excel
• Vé máy bay có được khấu trừ thuế ko
• Tặng các bạn ScrollText - Cuộn chữ: lên, xuống, trái phải,...
• [Help] Tự động liên kết các file excel lại với nhau
• Dùng VBA liên kết Form với các Sheet
• Quay phim và chiếu phim trong Excel!!!

[hoanghuy87]

Ðề: Tạo một danh sách xác thực thay đổi theo sự lựa chọn từ một danh sách khác nhờ VBA

Chuyện này có thể làm bằng công thức (hàm) của excel, nhưng khá vất vã!

Thêm nữa, nếu ổ [E1] ta chọn 1 ngày cụ thể nào đó trong quí, coi như ngày bắt đầu để khảo sát dữ liệu, thì ô [E3] dưới nó sẽ cho ta 1 danh sách chọn từ ngày bắt đầu (ở [E1] ta đã chọn) đến ngày cuối quí

Tại sao vất vả . Paste cái công thức này và cột B2 rồi drag nó xuống

="Q"&INT((MONTH(A2)-1)/3+1)&" - "&YEAR(A2)

Làm table list range hoặc dynamic range để pull down từng Qúy .

VBA cũng viết đơn giản vậy thôi . Muốn sạch mà ko mess up data thì sang Sheet2 mà đọc ngược lại data trong Sheet1