Trang 1/2 1 2 cuốicuối
Hiển thị kết quả tìm kiếm từ 1 đến 10 trên tổng số: 18
  1. #1
    Tham gia ngày
    02 2010
    Bài gởi
    17
    Cảm ơn
    53
    Được cảm ơn 7 lần trong 6 bài viết

    Smile Xin hướng dẫn cách tạo mẫu in giấy khen và lệnh in 1 lúc nhiều trang

    Thưa các bạn, mình đang làm 1 file in giấy khen cho trường nhưng không biết cách liên kết dữ liệu từ Sheet danh sách khen đến sheet trang in (những ô màu xanh) và cách làm thế nào để chỉ cần 1 lần lệnh in là có thể in hết danh sách
    - Xin nhờ các bạn chỉ thêm cách tạo Form liên kết Sheet như mẫu ở Sheet Menu

    Rất mong được sự giúp đở của các bạn, xin cám ơn.
    Tập tin đính kèm Tập tin đính kèm

  2. Có 2 thành viên cảm ơn maikhoa về bài viết này:


  3. #2
    Tham gia ngày
    03 2008
    Nơi Cư Ngụ
    Đồng ruộng Long An
    Bài gởi
    5,431
    Cảm ơn
    8,454
    Được cảm ơn 9,532 lần trong 4,290 bài viết
    Trích Nguyên văn bởi maikhoa View Post
    Thưa các bạn, mình đang làm 1 file in giấy khen cho trường nhưng không biết cách liên kết dữ liệu từ Sheet danh sách khen đến sheet trang in (những ô màu xanh) và cách làm thế nào để chỉ cần 1 lần lệnh in là có thể in hết danh sách
    - Xin nhờ các bạn chỉ thêm cách tạo Form liên kết Sheet như mẫu ở Sheet Menu

    Rất mong được sự giúp đở của các bạn, xin cám ơn.
    Bạn dùng code sau nhé:

    Code:
    Sub InGiayKhen()
    Dim rng As Range
    On Error Resume Next
    Set rng = Application.InputBox( _
    "Vui long quet chon vung co so thu tu can in " & _
        vbNewLine & vbNewLine & vbNewLine & _
        vbNewLine & "cot A Sheet 'Danh Sach Khen'  ", "Chon so thu tu", Type:=8)
    On Error GoTo 0
    If Not rng Is Nothing Then
      For Each rng In rng
        Range("b25") = rng.Value
        ' neu ban muon in luon khong can xem lai thi thay PrintPreview bang PrintOut
        If Range("d13").Value <> "" Then ActiveWindow.SelectedSheets.PrintPreview
      Next rng
    Else
      MsgBox "Ban da khong chon in"
    End If
    End Sub
    Tập tin đính kèm Tập tin đính kèm
    thay đổi nội dung bởi: Hai Lúa Miền Tây, 29-09-10 lúc 02:39 PM
    Già của tuổi trẻ, trẻ của tuổi già.

  4. Có 7 thành viên cảm ơn Hai Lúa Miền Tây về bài viết này:


  5. #3
    Tham gia ngày
    04 2009
    Bài gởi
    30
    Cảm ơn
    35
    Được cảm ơn 10 lần trong 8 bài viết
    Trích Nguyên văn bởi maikhoa View Post
    Thưa các bạn, mình đang làm 1 file in giấy khen cho trường nhưng không biết cách liên kết dữ liệu từ Sheet danh sách khen đến sheet trang in (những ô màu xanh) và cách làm thế nào để chỉ cần 1 lần lệnh in là có thể in hết danh sách
    - Xin nhờ các bạn chỉ thêm cách tạo Form liên kết Sheet như mẫu ở Sheet Menu

    Rất mong được sự giúp đở của các bạn, xin cám ơn.
    Ngoài cách của bác domfootwear là dùng code, bạn maikhoa cũng có thể dùng chức năng mail merge của word để in : dữ liệu từ Excel, form in ở word.
    Nếu maikhoa có siêng thì tạo lại form in ở word, rồi mình làm lại bảng dữ liệu trong excel và tạo link cho bạn.
    Bạn có thể gửi file theo diễn đàn này, hoặc gửi vào email cho mình : urdata123@gmail.com
    Kế toán bằng Excel sites.google.com/site/urdata123

  6. Có 2 thành viên cảm ơn glshop về bài viết này:


  7. #4
    Tham gia ngày
    05 2008
    Nơi Cư Ngụ
    Hải Phòng
    Bài gởi
    4,354
    Cảm ơn
    3,522
    Được cảm ơn 7,066 lần trong 3,327 bài viết
    Mình thấy vấn đề này nằm trong tầm tay thôi mà. Các bạn đừng nghĩ dùng Word đơn giản hơn Excel. Theo mình thì việc co dãn dòng cột với Excel rất linh động thuận tiện cho việc căn thả. Thậm chí, kết hợp với các Rectangle, TextBox, AutoSharp... thoải mái cho việc căn chỉnh theo yêu cầu. Đã bạn nào in tờ khai HQ, Hồ sơ hàng xuất sẽ thấy Exc lợi hại cỡ nào.

    Vấn đề ở đây mình nghĩ là: Thời buổi này không ai in giấy khen đen trắng cả. Mà in màu thì đắt quá. Thường là căn thả trên mẫu in sẵn. Như vậy vấn đề không phải Merger nữa

    Theo mình thì ta scan 1 tờ giấy khen, insert nó vào sheet và định dạng không in nó. Sau đó ta dùng các ô textbox chẳng hạn liên kết và hiển thị dữ liệu. Khi in ra chỉ có dữ liệu liên kết được in và vị trí của nó chuẩn xác như xếp tay vậy.
    Dùng VBA để thay đổi dữ liệu và in ra toàn bộ danh sách. Lúc đó, với nhiệm vụ in giấy khen của 1 trường thì chuyện nhỏ như con thỏ

  8. Có 3 thành viên cảm ơn sealand về bài viết này:


  9. #5
    Tham gia ngày
    02 2010
    Bài gởi
    17
    Cảm ơn
    53
    Được cảm ơn 7 lần trong 6 bài viết
    Mong bạn chỉ rõ hơn, mình nhấn lệnh in nhưng báo lỗi Macro hay Sectury gì đó, còn chèn code vào đâu? mình dốt VBA lắm. Cám ơn bạn

  10. #6
    Tham gia ngày
    03 2008
    Nơi Cư Ngụ
    Đồng ruộng Long An
    Bài gởi
    5,431
    Cảm ơn
    8,454
    Được cảm ơn 9,532 lần trong 4,290 bài viết
    Trích Nguyên văn bởi maikhoa View Post
    Mong bạn chỉ rõ hơn, mình nhấn lệnh in nhưng báo lỗi Macro hay Sectury gì đó, còn chèn code vào đâu? mình dốt VBA lắm. Cám ơn bạn
    Bạn vào Tools\Macro, chọn Security... Hộp thoại hiện ra bạn chọn Medium... nhấn OK, thoát tất cả các file Excel, mở file đó lên lại, bạn thấy có thông báo, nhấn Enable macro...
    Bây giờ chạy bình thường.
    Già của tuổi trẻ, trẻ của tuổi già.

  11. Thành viên sau cảm ơn Hai Lúa Miền Tây về bài viết này:


  12. #7
    Tham gia ngày
    07 2007
    Bài gởi
    9
    Cảm ơn
    9
    Được cảm ơn 31 lần trong 6 bài viết
    In giấy khen mình hay dùng chức năng Mail Merge của MS Word, kết hợp với danh sách trong Excel. Tuy không đúng như với yêu cầu của bạn, nhưng mình đang dùng phương pháp này, đáp ứng đầy đủ các yêu cầu của bạn, và mình thấy nó rất dễ dùng, hiệu quả. Mình đính kèm file mẫu mình làm sẵn, bạn tải về xem nhé.
    Tập tin đính kèm Tập tin đính kèm

  13. Có 8 thành viên cảm ơn jdkhang về bài viết này:


  14. #8
    Bài viết #2 của bạn domfootwear quá chuẩn, hay và rất pro. Thank!

  15. #9
    Cho mình hỏi nếu muốn chèn thêm font vni vào cho đẹp thì làm thế nào??

  16. #10
    Tham gia ngày
    06 2008
    Bài gởi
    8
    Cảm ơn
    0
    Được cảm ơn 4 lần trong 3 bài viết
    làm bên word là xưa không khoa học. Bạn viết đoạn Code là in ấn toàn bộ trên Excel.
    Ví dụ: Tôi có 100 học sinh cần in giấy khen, Tôi muốn in từ em 40 đến em 60 thì trong word làm được nhưng cực khổ lắm

Trang 1/2 1 2 cuốicuối

Thông tin về chủ đề này

Users Browsing this Thread

Hiện có 1 người đang xem đề tài này. (0 thành viên và 1 khách)

Đề tài tương tự

  1. Tạo header & Footer nhiều lần khác nhau trong nhiều trang phải làm như thế nào?
    Viết bởi huatrungkien2512 trong chuyên mục Hỏi đáp những vấn đề khác
    Trả lời: 4
    Bài mới gởi: 29-10-13, 11:29 PM
  2. Quản lý Thi đua khen thưởng
    Viết bởi Tuan_hcth trong chuyên mục Hàm và công thức Excel
    Trả lời: 10
    Bài mới gởi: 02-04-11, 04:24 PM
  3. Xoay 1 trang nằm ngang trong nhiều trang
    Viết bởi lamthixuan trong chuyên mục Định dạng, trình bày, in ấn bảng tính
    Trả lời: 5
    Bài mới gởi: 21-01-10, 09:06 AM
  4. góp ý kiến về việc khen thưởng!
    Viết bởi heineken trong chuyên mục Những góp ý với diễn đàn
    Trả lời: 14
    Bài mới gởi: 25-09-08, 02:08 PM
  5. Xuất ra bản khen thưởng, làm như thế nào
    Viết bởi PhanThienPhu trong chuyên mục Excel và Giáo Dục
    Trả lời: 31
    Bài mới gởi: 30-05-08, 08:11 PM

Bookmarks

Bookmarks

Quyền Sử Dụng Ở Diễn Ðàn

  • Bạn không thể đăng đề tài mới
  • Bạn không thể đăng trả lời
  • Bạn không thể đăng file đính kèm.
  • Bạn không thể sửa bài viết.
  •  

Mudim v0.8 Tắt VNI Telex Viqr Tổng hợp
Chính tả Bỏ dấu kiểu mới  [Bật/Tắt (F9)]