Thủ Thuật Excel - Thủ Thuật Word - Tin Học Văn Phòng
THUTHUATEXCEL.COM - THỦ THUẬT EXCEL, THỦ THUẬT WORD, TIN HỌC VĂN PHÒNG Facebook 2019-11-12T06:03:35Z Ở bài viết cách tạo form nhập liệu có bạn gửi mail tới và yêu cầu hướng dẫn cách thêm lệnh in để khi in xong thì dữ liệu tự động làm mấ...

Tự Động Xóa Dữ Liệu Khi In Xong Bằng VBA

In ra - Lưu thành PDF - Gửi qua email


Ở bài viết cách tạo form nhập liệu có bạn gửi mail tới và yêu cầu hướng dẫn cách thêm lệnh in để khi in xong thì dữ liệu tự động làm mất để nhập dữ liệu mới vào, thiết nghĩ nhiều bạn cũng cần nên tôi quyết định viết một bài để chia sẽ luôn cho các bạn.

Mục đích của việc làm này là gì, đó là bạn có một form chứa các thông tin cố định và các thông tin thay đổi để nhập vào, và mỗi lần nhập liệu xong các bạn in ra giấy, sau đó lại nhập dữ liệu mới vào, thông thường chúng ta sẽ xóa những dữ liệu cũ đi, nhưng nếu việc này lặp lại nhiều lần thì chúng ta sẽ mất thời gian để xóa chúng, do vậy chúng ta sẽ thiết kế một nút in và khi nhấn nút in thì dữ liệu sẽ in ra và đồng thời sẽ được làm mới, để hiểu hơn các bạn quan sát hướng dẫn bên dưới.

Chúng ta có một form cố định, còn các dòng chữ đỏ là các dữ liệu thay đổi.


Đầu liên hãy vào Insert - Illustrations - Shapes và hãy chọn cho mình một hình bất kỳ


Sau khi vẽ thì chuột phải và chọn Edit Text để đặt tên


Cơ bản nó sẽ như thế này


Tiếp theo các bạn chuột phải vào nút mới tạo và chọn Assign Macro


Đặt tên bất kỳ, chẳng hạn tôi đặt là InIn, sau đó chọn New


Dán đoạn code sau vào khung soạn thảo

Private Sub InIn()
    Dim rngPrt As Range
    Set rngPrt = ActiveSheet.Range("A1:D7")
    rngPrt.PrintPreview
    Range("A1:A1").Select
    Selection.ClearContents
    Range("C3:C7").Select
    Selection.ClearContents
End Sub

Chú ý:

- Vùng in ở đây là A1: A7, các bạn có thể sửa lại vùng in sao cho phù hợp với chứng từ của bạn

- Ô dữ liệu được xóa là A1:A1; C3:C7, và nếu bạn có nhiều hơn hoặc nằm ở ô khác thì hãy thay đổi vào cho phù hợp


Tắt cửa sổ VBA đi, lúc này bạn thử nhấn vào nút PRINT xem kết quả nhé


Một cửa số hiện ra, kiểm tra lại và nhấn Print


Dữ liệu của bạn được in ra đồng thời dữ liệu thay đổi đã biến mất, bạn tiến hành nhập dữ liệu mới vào là xong, nếu như excel cảnh báo hoặc không chạy thì kiểm tra lại xem đã bật macro trong excel chưa nhé


Vừa rồi chúng ta đã tìm hiểu cách tạo nút in và xử lý dữ liệu trong excel như thế nào rồi, hy vọng sẽ có ích cho các bạn, chúc các bạn thành công.


 

Cao Cuong

Đã từng rất sợ excel dẫn đến ghét excel và rồi công việc chủ yếu sử dụng excel thế là yêu excel, những gì mình biết về excel mình muốn chia sẻ lại cho cộng đồng, đó là lý do các bạn thấy mình ở đây. Nếu thấy nội dung bài viết hữu ích hãy giúp mình chia sẻ đến mọi người nhiều hơn để cùng nhau tiến bộ nhé. Cảm ơn rất nhiều.

5 THUTHUATEXCEL.COM - THỦ THUẬT EXCEL, THỦ THUẬT WORD, TIN HỌC VĂN PHÒNG: Tự Động Xóa Dữ Liệu Khi In Xong Bằng VBA Ở bài viết cách tạo form nhập liệu có bạn gửi mail tới và yêu cầu hướng dẫn cách thêm lệnh in để khi in xong thì dữ liệu tự động làm mấ...

Bài Mới Nhất: