Giúp in có điều kiện

Liên hệ QC

tueyennhi

Thành viên tích cực
Tham gia
18/10/10
Bài viết
1,192
Được thích
105
Dear các anh chị em trong diễn đàn!Hàng tháng em phải in voucher sinh nhật cho rất nhiều CBCNV. Như file đính kèm em phải copy paste danh sách rất nhiều lần để in. Anh chị có cách nào tạo một form mẫu để in theo danh sách mà không phải làm thủ công như em đang làm không??? Em đã nghĩ đến mail merge nhưng không khả quan.Mong anh chị hướng dẫn!
 

File đính kèm

Lần chỉnh sửa cuối:
Dear các anh chị em trong diễn đàn!

Hàng tháng em phải in voucher sinh nhật cho rất nhiều CBCNV. Như file đính kèm em phải copy paste danh sách rất nhiều lần để in. Anh chị có cách nào tạo một form mẫu để in theo danh sách mà không phải làm thủ công như em đang làm không??? Em đã nghĩ đến mail merge nhưng không khả quan.

Mong anh chị hướng dẫn!
Cái này có nhiều trong diễn đàn rồi, bạn up file mẫu lên sẽ có người giúp ngay.
 
Cảm ơn mọi người. Mình mò không được. Trong danh sách của mình không phải giới hạn đến số 48. Mà có thể từ 1 đến vài trăm. Vì vậy khi mình in số thứ tự mà vượt quá 48 là nó không up được dữ liệu nữa. Mình thấy file của befaint rất hay, nhưng cũng mắc lỗi giống hkphuong khi vượt quá số 48. File của HKphuong thi khi preview mà muốn out luôn không được phải close rất mất thời gian :).
 
Như thế này có được ko bạn?
Hướng dẫn xem link tại chữ ký của tôi.
 

File đính kèm

Hi hkphuong

Bạn thử mà xem, mình cho danh sách 100 người, bấm in từ 48 trở lên là lỗi các giá trị trong form đều thành #N/A. Tất nhiên file có thể in ngay nhưng mà khi bấm nút preview của bạn thì...
 
Cột số thứ tự của bạn bạn phải kéo tới 100 chứ.
Nó bị #N/A là trong form tôi xài hàm vlookup, căn cứ vào số thứ tự mà nó lấy vào form. ...Hok lẻ bạn không hiểu.
Số số thứ thự là cột D của bạn
trong các giá trị tại form có công thức này:
Mã:
 =VLOOKUP($J$2,$D$2:$G$500,4,0)

Có nghĩa là đang giới hạn tới dòng 500, nếu danh sách của bạn dài hơn dòng 500 thì bạn chỉnh lại tất cả công thức vlookup có trong form...
p/s: code tôi không có nút Preview nào hết. Bấm phát nó in ra máy in luôn...Vậy liệu mà bấm chứ...


Hi hi dow file trùng tên nên nhận xét nhầm người. File bạn rất hay nhưng bạn nhìn nhé. Quá 48 nó như trong hình này nè.
 

File đính kèm

  • Untitled.jpg
    Untitled.jpg
    30.9 KB · Đọc: 18
À mình hiểu rồi, hóa ra muốn in tiếp phải kéo cột thứ tự cho số thứ tự tăng lên. Tạm thời ổn. Thank bạn nhiều nhé :).
P/s: Một page của mình in được 12 voucher. Danh sách có 24 người. Khi in từ người thứ 13 đến 15 thì mặc dù người thứ 16 đến 24 ko được in nó vẫn cứ lọt vào danh sách miến là cùng trang đó. Có cách nào mà đứa nào ko được in thì nó biến thành N#A or ko có giá trị gì hết không bác?
 
Đã viết rồi thì cũng đành nhắc vậy :(, bạn đã đọc bài #9 chưa?
 
Điều đó là không thể. Vì form mặc định...là nó lấy số thứ tự TỪ mà nó cộng tiếp theo cho đủ 12 người....
Thì bạn cứ in ra và lấy kéo cắt bỏ đi...chứ gì đâu mà khó khăn...

Nói túm lại, đừng được voi thì đòi Hai bà Trưng nhé. Cái gì cũng phải có giới hạn... Được này thì mất kia... Muốn in ít người thì bạn copy Form riêng ra rồi in...
Còn in tự động thì phải theo form....

He he thank kiu bạn nhé. Đỡ hơn bao nhiêu.
 
Điều đó là không thể. Vì form mặc định...là nó lấy số thứ tự TỪ mà nó cộng tiếp theo cho đủ 12 người....
Thì bạn cứ in ra và lấy kéo cắt bỏ đi...chứ gì đâu mà khó khăn...

Nói túm lại, đừng được voi thì đòi Hai bà Trưng nhé. Cái gì cũng phải có giới hạn... Được này thì mất kia... Muốn in ít người thì bạn copy Form riêng ra rồi in...
Còn in tự động thì phải theo form....

À cho mình hỏi thêm sao không có tùy chọn máy in à bạn?
 
Option Explicit
Private Sub CommandButton1_Click()
Dim I&, Tu&, De&
Tu = [K2].Value: De = [L2].Value
For I = Tu To De Step 12
[J2] = I
Sheet1.PrintOut from:=1, To:=1, copies:=1
Next I
End Sub

Dòng lệnh này nghĩa là gì vậy bạn?}}}}}
 
Option Explicit
Private Sub CommandButton1_Click()
Dim I&, Tu&, De&
Tu = [K2].Value: De = [L2].Value
For I = Tu To De Step 12
[J2] = I
Sheet1.PrintOut from:=1, To:=1, copies:=1
Next I
End Sub

Dòng lệnh này nghĩa là gì vậy bạn?}}}}}
bạn không nói dòng nào thì để mình chọn dùm
dòng Next I
next có nghĩa là kế bên đó bạn
 
...khi preview mà muốn out luôn không được phải close rất mất thời gian :).
Bận giờ mới quay lại xem bài...
Giời ơi. Cẩn thận làm cái preview cho người ta test thử nhưng ai ngờ phản tác dụng.
(preview = preview, print =print, không lẽ preview = in)
 
Bận giờ mới quay lại xem bài...
Giời ơi. Cẩn thận làm cái preview cho người ta test thử nhưng ai ngờ phản tác dụng.
(preview = preview, print =print, không lẽ preview = in)

Thì mình preview chứ có nói in đâu. Nhưng khi view vào rồi thì không out luôn được phải close đến khi hết trang in mới out được :=\+
 
Web KT

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

Back
Top Bottom