Xuất File tổng hợp thành nhiều file trong Excel 2003

[quanvm]

Chào các anh chị trên diễn đàn !

- Trong sheet(main) của file tonghop tôi tạo một nút lệnh " xuat DL tung k"
- Dữ liệu xuất từ sheet(data) dựa vào mã địa bàn điều tra là cột U của sheet(data)
Cụ thể là:
Điều kiện xuất phải phụ thuộc vào ô D4 của sheet(main)
+ Khi ô D4 = 001 và click nút lệnh tất cả các dòng có mã 001 của sheet(data) thì xuất thành file k1, khi xuất file phải mở hộp thoại save, dựa vào hộp thoại này để lưu trữ file k1
+ Khi ô D4 = 002 và click nút lệnh tất cả các dòng có mã 002 của sheet(data) thì xuất thành file k2, khi xuất file phải mở hộp thoại save, dựa vào hộp thoại này để lưu trữ file k2
+ Tương tự như vậy cho các mã còn lại
File đính kèm :

View attachment 13738



Trân trọng cảm ơn các anh , chị trên diễm đàn!

View more random threads:

• Cách tính giá vốn hàng bán
• Click vào Cell hiện ra cái lịch để nhập 1 ngày
• đăng ký học vba excel tại hà nội
• Tặng file bảng kê tiền
• Làm sao để tổng hợp các dữ liệu của các sheet.
• Tài liệu Macro
• Tặng các bạn làm ở Ngành TNMT File theo dõi hợp đồng Đo đạc
• Làm sao để past link từ word (nhiều trang liên tiếp) qua Excel
• Tạo mã phiếu thu( hay chi,nhập,. . . .) có dạng MMDDYYxxx
• Xin giới thiệu với các bạn ba bảng chấm công & cách tính công các loại

[duccv]

Ðề: Mình nghĩ bạn không cần đến nhiều trang tính làm vậy đâu!

Chỉ 1 trang là đủ cho cả họ nhà nó rồi;

Bạn chọn địa bàn tại ô qui ước; Macro sẽ đưa bạn đến địa bàn cần thiết tại trang 'BCao'

Chúc khỏe nha.

[cushinthang]

Ðề: Mình nghĩ bạn không cần đến nhiều trang tính làm vậy đâu!

Chỉ 1 trang là đủ cho cả họ nhà nó rồi;

Bạn chọn địa bàn tại ô qui ước; Macro sẽ đưa bạn đến địa bàn cần thiết tại trang 'BCao'

Chúc khỏe nha.

Cảm ơn Bạn TQChanh đoạn cedo của bạn rất tuyệt vời. Nhưng mình cần xuất địa bàn điều tra thành một file riêng. Mục đích của mình tách thàh file riêng là để giao cho Cán bộ phụ trách địa bàn đó nhập dữ liệu từ 1 máy tính khác. Sau khi nhập xong nộp file đó cho mình, mình sẽ tổng hợp lại.
Mình có 18 địa bàn tương ứng với 18 cán bộ phụ trách. Bạm giúp mình nha! Cám ơn nhiều.

[anh321]

Ðề: Mình cũng làm theo hướng dẫn của bạn XuanThanh mà thôi; Chứ . . . .

Chuyện copy ra nhiều file mình không thích tí nào

Bạn xem trong file đính kèm, với các bước chỉ dẫn sau:
Khâu chuần bị:

a./ Chép file này vô D:motsach:

[tctexpress]

Ðề: Mình cũng làm theo hướng dẫn của bạn XuanThanh mà thôi; Chứ . . . .

Chuyện copy ra nhiều file mình không thích tí nào

Bạn xem trong file đính kèm, với các bước chỉ dẫn sau:
Khâu chuần bị:

a./ Chép file này vô D:motsach:

Cám ơn Bạn TQchanh !
đoạn code của bạn rất tuyệt vời mình áp dụng vào chương trình rất thành công.
Bạn ơi ! bạn cải tiến đoạn code này lên một bước nữa nha. Cụ thể:
- Trong thư mục D:-/Excel không cần phải tạo trước 18 file "DB001",..."DB018"
- Sau khi chọn địa bàn cần loc rồi ta bấm nút lệnh CTRL+SHIFT+C thì vẫn thực hiện copy file.
Thân chào bạn ! Địa chỉ Email của mình là huynhphuongthcspt@yahoo.com.vn