Nhờ mọi người bổ sung thêm code giúp tôi để hoàn thiện cho file "Giấy báo điểm".. (1 người xem)

[jacky_police]

Tôi đã sử dụng 1 file tạo giấy báo điểm cho học sinh thi trượt lớp 10 của 1 bạn đã gửi lên diễn đàn! Tuy nhiên về sử dụng tôi đã sửa lại cho phù hợp. Xong còn một số vấn đề tôi đã thử mà không được:
- Thứ 1: "Số" của Giấy báo điểm không tự điền vào khi bấm tạo.
- Thứ 2: Độ rộng của dòng (RowHeight = 18.75) khi tạo dữ liệu để in! Tôi muốn RowHeight rộng 25pixel mà nó vấn chỉ là 16,5 (22pixel).
Vậy nhờ pro nào rành về vấn đề này sửa giúp.
Thank!

 

[Quang_Hải]

Tôi đã sử dụng 1 file tạo giấy báo điểm cho học sinh thi trượt lớp 10 của 1 bạn đã gửi lên diễn đàn! Tuy nhiên về sử dụng tôi đã sửa lại cho phù hợp. Xong còn một số vấn đề tôi đã thử mà không được:
- Thứ 1: "Số" của Giấy báo điểm không tự điền vào khi bấm tạo.
- Thứ 2: Độ rộng của dòng (RowHeight = 18.75) khi tạo dữ liệu để in! Tôi muốn RowHeight rộng 25pixel mà nó vấn chỉ là 16,5 (22pixel).
Vậy nhờ pro nào rành về vấn đề này sửa giúp.
Thank!

Bạn xem file đính kèm nhé

 

[Ếch Xanh]

Bạn xem file đính kèm nhé

File ở đâu vậy anh Quang Hai? ẹc ... ẹc ...

 

[Quang_Hải]

File ở đâu vậy anh Quang Hai? ẹc ... ẹc ...

Câu hỏi này mình tính để dành cho tác giả mà.

 

[Ếch Xanh]

Câu hỏi này mình tính để dành cho tác giả mà.

Và bây giờ tác giả gửi file lên rùi kìa, anh ra tay nghĩa hiệp đi heheheheh

 

[jacky_police]

Sorry! Vì phải giảm bớt dung lượng.

 

[dhn46]

- Thứ 1: "Số" của Giấy báo điểm không tự điền vào khi bấm tạo.

Bạn sửa name B_D thành

=OFFSET(B.Diem!$B$5,0,0,COUNTA(B.Diem!$C$5:$C$11),14)

- Thứ 2: Độ rộng của dòng (RowHeight = 18.75) khi tạo dữ liệu để in! Tôi muốn RowHeight rộng 25pixel mà nó vấn chỉ là 16,5 (22pixel).

Bạn sửa đoạn CODE:

Sheet1.Range("A39:A15000").RowHeight = 18.75

thành

Sheet1.Range("39:15000").RowHeight = 18.75

 

[Quang_Hải]

Tôi đã sử dụng 1 file tạo giấy báo điểm cho học sinh thi trượt lớp 10 của 1 bạn đã gửi lên diễn đàn! Tuy nhiên về sử dụng tôi đã sửa lại cho phù hợp. Xong còn một số vấn đề tôi đã thử mà không được: - Thứ 1: "Số" của Giấy báo điểm không tự điền vào khi bấm tạo. - Thứ 2: Độ rộng của dòng (RowHeight = 18.75) khi tạo dữ liệu để in! Tôi muốn RowHeight rộng 25pixel mà nó vấn chỉ là 16,5 (22pixel). Vậy nhờ pro nào rành về vấn đề này sửa giúp. Thank!

Bạn xem file đính kèm

 

[jacky_police]

Bạn sửa name B_D thành




Bạn sửa đoạn CODE:


thành

Thank!
- Vấn đề thứ nhất tôi thử thi nó trả về giá trị Value! Có vấn đề gì không? hay là tôi chỉnh sai công thức!
- Vấn đề thứ 2 khi đổi lại thì giá trị của row vẫn là 16,25 (22pixels)
Tôi đề nghị bạn sửa trực tiếp vào file rồi up lên nhé!

 

[jacky_police]

Bạn xem file đính kèm

Cảm ơn Quanghai1969!
Với file đính kèm của bạn nó đã giải quyết được vấn đề của tôi rồi!
Tuy nhiên, với VBA thi tôi hơi kém. Bạn có thể giải thích nguyên nhân được không?
File gốc khi tạo giấy báo trang số 1 ko có dữ liệu! Giờ bạn tạo từ trang 1.
Hơn nữa! Nếu tôi muốn tạo 2 giấy báo trên 1 khổ giấy thì có thể làm được không?
Một lần nữa thank.

 

[dhn46]

Thank!
- Vấn đề thứ nhất tôi thử thi nó trả về giá trị Value! Có vấn đề gì không? hay là tôi chỉnh sai công thức!
- Vấn đề thứ 2 khi đổi lại thì giá trị của row vẫn là 16,25 (22pixels)
Tôi đề nghị bạn sửa trực tiếp vào file rồi up lên nhé!

Bạn xem file...................