CHƯƠNG TRÌNH TẠO SỔ

Liên hệ QC

baquang1984

Thành viên tiêu biểu
Tham gia
3/6/10
Bài viết
429
Được thích
44
Nghề nghiệp
Kỹ sư Lâm nghiệp
Em chào Thầy, cô và các anh chị trên diện đàn ạ
Nhờ Thầy, cô và anh chị viết giúp em code VBA để tạo sổ với ạ
- Yêu cầu của chương trình Khi điền số trang bắt đầu vào ô cell N2 và chọn vào Buttom Tạo sổ chương trình sẽ lấy dữ liệu để tạo sổ sang sheet So_CapGCN như dữ liệu mẫu.
- Quy định mỗi Giấy chứng nhận có 4 dòng để ghi dữ liệu được định dạng như dữ liệu mẫu
Lấy dữ liệu vào các cột của sheet So_CapGCN như sau:
+ Cột Số thứ tự: Dữ liệu được lấy từ cột F của sheet DATA_CapGCN
+ Cột Tên và địa chỉ của người được cấp GCN:
Dòng thứ nhất ghi tên của Chủ quản lý và vợ chồng theo điều kiện: Nếu dữ liệu ở cột K (HGĐ/CN) bằng 1 và Dữ liệu ở cột B bằng 1 cột D bằng 2 thì ghi như sau: Hộ ông: Dữ liệu ở cột A và bà: dữ liệu ở cột C (Như dữ liệu mẫu).
Nếu dữ liệu ở cột K (HGĐ/CN) bằng 1 và Dữ liệu ở cột B bằng 2 cột D bằng 1 thì ghi như sau: Hộ bà: Dữ liệu ở cột A và ông: dữ liệu ở cột C (Như dữ liệu mẫu).
Nếu dữ liệu ở cột K (HGĐ/CN) bằng 2 và Dữ liệu ở cột B bằng 1 cột D bằng 2 thì ghi như sau: Ông: Dữ liệu ở cột A Bà: dữ liệu ở cột C (Như dữ liệu mẫu).
Nếu dữ liệu ở cột K (HGĐ/CN) bằng 2 và Dữ liệu ở cột B bằng 2 cột D bằng 1 thì ghi như sau: Bà: Dữ liệu ở cột A Ông: dữ liệu ở cột C (Như dữ liệu mẫu).
Dòng thứ hai lấy dữ liệu ở cột E, I
Dòng thứ 3 lấy dữ liệu ở cột J
+ Cột Số phát hành GCN lấy dữ liệu ở cột G của sheet DATA_CapGCN
+ Cột Ngày ký GCN lấy dữ liệu ở cột H của sheet DATA_CapGCN
+ Cột Ngày giao GCN định dạng ...../...../202....
Em cảm ơn Thầy, cô và các anh chị nhiều ạ!
 

File đính kèm

  • Tao_SoCapGCN.xls
    121.5 KB · Đọc: 4
Em chào Thầy, cô và các anh chị trên diện đàn ạ
Nhờ Thầy, cô và anh chị viết giúp em code VBA để tạo sổ với ạ
- Yêu cầu của chương trình Khi điền số trang bắt đầu vào ô cell N2 và chọn vào Buttom Tạo sổ chương trình sẽ lấy dữ liệu để tạo sổ sang sheet So_CapGCN như dữ liệu mẫu.
- Quy định mỗi Giấy chứng nhận có 4 dòng để ghi dữ liệu được định dạng như dữ liệu mẫu
Lấy dữ liệu vào các cột của sheet So_CapGCN như sau:
+ Cột Số thứ tự: Dữ liệu được lấy từ cột F của sheet DATA_CapGCN
+ Cột Tên và địa chỉ của người được cấp GCN:
Dòng thứ nhất ghi tên của Chủ quản lý và vợ chồng theo điều kiện: Nếu dữ liệu ở cột K (HGĐ/CN) bằng 1 và Dữ liệu ở cột B bằng 1 cột D bằng 2 thì ghi như sau: Hộ ông: Dữ liệu ở cột A và bà: dữ liệu ở cột C (Như dữ liệu mẫu).
Nếu dữ liệu ở cột K (HGĐ/CN) bằng 1 và Dữ liệu ở cột B bằng 2 cột D bằng 1 thì ghi như sau: Hộ bà: Dữ liệu ở cột A và ông: dữ liệu ở cột C (Như dữ liệu mẫu).
Nếu dữ liệu ở cột K (HGĐ/CN) bằng 2 và Dữ liệu ở cột B bằng 1 cột D bằng 2 thì ghi như sau: Ông: Dữ liệu ở cột A Bà: dữ liệu ở cột C (Như dữ liệu mẫu).
Nếu dữ liệu ở cột K (HGĐ/CN) bằng 2 và Dữ liệu ở cột B bằng 2 cột D bằng 1 thì ghi như sau: Bà: Dữ liệu ở cột A Ông: dữ liệu ở cột C (Như dữ liệu mẫu).
Dòng thứ hai lấy dữ liệu ở cột E, I
Dòng thứ 3 lấy dữ liệu ở cột J
+ Cột Số phát hành GCN lấy dữ liệu ở cột G của sheet DATA_CapGCN
+ Cột Ngày ký GCN lấy dữ liệu ở cột H của sheet DATA_CapGCN
+ Cột Ngày giao GCN định dạng ...../...../202....
Em cảm ơn Thầy, cô và các anh chị nhiều ạ!
Thử code loằng ngoằng này xem:
 

File đính kèm

  • Tao_SoCapGCN.xlsm
    44.8 KB · Đọc: 11
Upvote 0
Em cảm ơn ad nhiều ạ
 
Upvote 0
Web KT

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

Back
Top Bottom