Làm nhãn vở học sinh trên Excel

Liên hệ QC

ndu96081631

Huyền thoại GPE
Thành viên BQT
Super Moderator
Tham gia
5/6/08
Bài viết
30,703
Được thích
53,918
Tôi thấy thằng con tôi cứ lui cui với mấy cái nhãn vở, lúc thì mua mẫu có sẳn, lúc thì tự vẽ lấy mà thấy nó vẫn không mấy hài lòng
Tôi chợt nghĩ tại sao mình không dùng Excel để thiết kế nhỉ? Mẫu thì cứ lên Google down về, chèn các trường vào là xong!
1> Nhập liệu
Ta nhập liệu đầy đủ vào sheet Data như hình:

untitled1.JPG


2> In nhãn
Bên sheet Print đã thiết kế sẳn mẫu với 10 nhãn trong 1 trang in, chỉ việc bấm nút là toàn bộ các record bên Data sẽ tự chèn vao

untitled2.JPG


Tôi đã thiết sẳn 3 file với 3 loại font thông dụng: TCVN, VNI và Unicode ---> Download tại đây: http://www.mediafire.com/?bumgdrjxe7kbmr3
Riêng Unicode, vì không có mẫu font đẹp nên các bạn cần down thêm font để hổ trợ ---> Download tại đây: http://www.mediafire.com/?uuzop9ckz1xudkv
------------------------------------------------------------
Các bạn có thể dùng loại giấy có keo dán sẳn ở mặt dưới để in. In xong, chỉ việc lọt lớp giấy bọc keo là có thể dán vào vở
Vì tôi không có khiếu lắm về mấy vụ thiết kế này nên mong các bạn download về dùng và góp ý cho hoàn thiện thêm
Cảm ơn
 
Lần chỉnh sửa cuối:
Không ngờ Anh cũng có nhã hứng với mấy cái vụ này, hi hi

Khi mở file lên, mỗi lần lật trang nó refresh lại màn hình (do có nhiều Frame hoa văn), màn hình chớp giật liên tục muốn treo Excel luôn anh à.

Xin nói thêm loại giấy Decal có loại in không ăn mực kể cả in Laser. Nên hỏi kỹ người bán trước khi mua, hình như loai giấy Decal mặt sau có màu xanh nhạt mới in được.

TDN
 
Không ngờ Anh cũng có nhã hứng với mấy cái vụ này, hi hi
Hết mình vì con cái thôi... Làm Excel lâu nay mà chẳng ứng dụng để giúp con mình thì thật.. quá tệ
Ẹc.. Ẹc...


Khi mở file lên, mỗi lần lật trang nó refresh lại màn hình (do có nhiều Frame hoa văn), màn hình chớp giật liên tục muốn treo Excel luôn anh à.
Tôi cũng không biết nữa, trên máy tôi thì in bình thường, có giật nhưng chẳng đến nỗi nào
Tuy nhiên, tôi đề xuất giải pháp chuyển mẫu nhãn vở thành Picture (nó sẽ là 1 "khối" thống nhất), chỉ chừa lại các textbox thôi ---> Tôi làm 1 file, gữi lên Thầy thử xem sao nhé

Xin nói thêm loại giấy Decal có loại in không ăn mực kể cả in Laser. Nên hỏi kỹ người bán trước khi mua, hình như loai giấy Decal mặt sau có màu xanh nhạt mới in được.
Cty tôi đang dùng loại giấy mà tiếc là nó hổng có tên tuổi gì cả, chẳng biết gọi là là gì nữa... nhưng in thì OK, rõ và ăn mực
 

File đính kèm

  • NhanVo_Un_Testi.rar
    126.3 KB · Đọc: 2,771
Lần chỉnh sửa cuối:
Cảm ơn anh, lần này thì OK, chạy êm ru. Nhưng mà có voi rồi, lại muốn có thêm 2BT, hi hi
Tiện thể anh giúp luôn : nếu mình đổi Font hay Size ở Cột M thì các nhãn vở cũng thay đổi theo luôn
Thay mặt các cháu cảm ơn anh nhé, ẹc ẹc

TDN
 
Cảm ơn anh, lần này thì OK, chạy êm ru. Nhưng mà có voi rồi, lại muốn có thêm 2BT, hi hi
Tiện thể anh giúp luôn : nếu mình đổi Font hay Size ở Cột M thì các nhãn vở cũng thay đổi theo luôn
Thay mặt các cháu cảm ơn anh nhé, ẹc ẹc

TDN
Ẹc... Ẹc... thầy Phước cứ nói đùa. Toàn bộ các TextBox đã được Group chung thành 1 nhóm (tên là txtGrp) ---> Vậy thì cứ "nắm đầu" thằng này mà chỉnh Font, size gì gì đó tuỳ thích thôi. Bằng tay cũng được, bằng VBA cũng đâu có làm khó thầy chứ
PHP:
With Sheet1.Shapes("txtGrp").TextFrame.Characters.Font
  .Size = ???
  .Name = ???
End With
Thôi... thầy làm luôn đi ---> Có ý tưởng gì hay về phần thiết kế, nhớ post lên cho mình học hỏi với (mình kém vụ thiết kế này lắm)
 
tedaynui đã viết:
nếu mình đổi Font hay Size ở Cột M thì các nhãn vở cũng thay đổi theo luôn
Bỏ bớt vài cái ẹc ẹc, thay bằng 3 cái khà khà khà:
PHP:
With Sheet1.Shapes("txtGrp").TextFrame.Characters.Font
      .Size = [M2].Font.Size
      .Name = [M2].Font.Name
End With
 
Cảm ơn thầy nhìu lắm lắm, năm nay con em vào lớp 1, nhờ thấy mà em có được nhãn vở đẹp cho bé.
 
bác ơi cho cháu hỏi làm thế nào để sử dụng dữ liệu ở sheet data ạ,cháu muốn in nhãn theo tên trường lớp của cháu mà ko biết làm.**~**
 
bác ơi cho cháu hỏi làm thế nào để sử dụng dữ liệu ở sheet data ạ,cháu muốn in nhãn theo tên trường lớp của cháu mà ko biết làm.**~**
Thì bạn cứ nhập liệu bình thường bên sheet Data là được rồi, có vấn đề gì chứ?
 
Bác Ndu viết code gọn gàng quá, nhưng cải tiến 1 chút để nó in ra từng cái nhãn vở theo số lượng data (như report access) thì hay hơn nữa.
Cái này rất hữu ích vì nếu chỉ cần in 1 cái mà in tất cả trang giấy thì hơi lãng phí mực ...
Tks anh Ndu!
 
Bác Ndu viết code gọn gàng quá, nhưng cải tiến 1 chút để nó in ra từng cái nhãn vở theo số lượng data (như report access) thì hay hơn nữa.
Cái này rất hữu ích vì nếu chỉ cần in 1 cái mà in tất cả trang giấy thì hơi lãng phí mực ...
Tks anh Ndu!
Thì bạn cải tiến đi...
Vì mấy câu học sinh (bạn của con tôi) toàn nhờ in 1 lần 10 nhãn nên tôi thiết kế như vậy
 
Lần chỉnh sửa cuối:
cháu nhập tên trường lớp của cháu vào sheet data rồi phải làm thế nào để in ra nhãn tên cháu ạ,xin lỗi làm phiền chú tại cháu ko biết về excel chỉ muốn in cái nhãn vở mà loay hoay mãi ko được ạ
 
cháu nhập tên trường lớp của cháu vào sheet data rồi phải làm thế nào để in ra nhãn tên cháu ạ,xin lỗi làm phiền chú tại cháu ko biết về excel chỉ muốn in cái nhãn vở mà loay hoay mãi ko được ạ
Bạn cứ sang sheet Print, check vào mục In tất cả, xong bấm nút Print xem thế nào
Sheet thiết kế quá đơn giản, vọc cũng ra mà.. Tôi không nghĩ rằng file này lại gây khó khăn cho bạn khi sử dụng (trừ phi bạn không biết Enable macros thì có làm gì cũng không chạy được chương trình)
 
đúng là do cháu chưa enable cai macro,cháu làm được rồi ạ,cảm ơn chú.--=0
 
Thì bạn cải tiến đi...
Vì mấy câu học sinh (bạn của con tôi) toàn nhờ in 1 lần 10 nhãn nên tôi thiết kế như vậy
Vâng e cũng đã làm 1 file in thẻ nhân viên công ty theo dạng như vậy rùi, nhưng code lủng củng quá...+-+-+-+
 
Cảm ơn thày ndu, từ nay em đỡ phải mất tiền đi mua nhãn vở cho cháu rồi. Xuống cơ quan in cái của thày cho rẻ mà lại đẹp nữa chứ.
 
Liệu có thể tách quyển vở ở giữa ra để làm bìa sách được không ah?

Bé lớn nhà em rất thích bìa do thày thiết kế, đứa thứ 2 đang học lớp 1 lại cứ đòi bằng được cái hình quyển sách đang mở ra ở trong file em đính kèm. Em đi tìm mãi trên mạng chẳng được. Em xin được mạo muội gửi nhờ thày cái hình này trong chủ đề của thày, rất mong thày và mọi người giúp em có thể tách hình trong đó ra làm 3 hình nhỏ được không ah? Nếu được xin hãy giúp em với.
 

File đính kèm

  • Tach ra lam 3 hinh.docx
    38.3 KB · Đọc: 254
Lần chỉnh sửa cuối:
Bé lớn nhà em rất thích bìa do thày thiết kế, đứa thứ 2 đang học lớp 1 lại cứ đòi bằng được cái hình quyển sách đang mở ra ở trong file em đính kèm. Em đi tìm mãi trên mạng chẳng được. Em xin được mạo muội gửi nhờ thày cái hình này trong chủ đề của thày, rất mong thày và mọi người giúp em có thể tách hình trong đó ra làm 3 hình nhỏ được không ah? Nếu được xin hãy giúp em với.
Mấy cái này thuộc về thiết kế thôi bạn à!
Bạn cứ thiết kế thoải mái, chẳng liên quan gì đến code đâu
Còn việc tách hình thì cứ dùng MSPaint của Windows cũng làm được rồi
 
Lần chỉnh sửa cuối:
Nhưng em đang cần cái hình ở giữa, em không tách được thày ah.
Hình ở giữa là quyển sách, nó đang bi "che" bởi cây viết
Vậy e rằng bạn phải dùng phần mềm đồ họa để làm việc này thôi (tách bỏ những chổ không cần thiết và tự vẽ thêm những chổ bị thiếu)
 
Web KT
Back
Top Bottom