Tạo số bản ghi duy nhất - Mẹo Excel

Janet từ Anh đã đặt ra câu hỏi hôm nay.

Chúng ta cần biết cách thiết lập macro sẽ chỉ định một số hóa đơn duy nhất, cách thiết lập macro thứ hai sẽ lưu hóa đơn đã hoàn thành dưới dạng số duy nhất.

Đây là ứng dụng giả định mà tôi đang tưởng tượng. Có một sổ làm việc với một trang tính Hóa đơn và một trang tính Menu. Tôi đề xuất lưu trữ số hóa đơn cuối cùng trên một ô khác trên trang tính Menu, giả sử Z1. Nếu số hóa đơn được cho là nằm trong ô H2 của trang tính hóa đơn, thì macro này sẽ thực hiện thủ thuật:

Sub GetNextInvoiceNumber() LastInv = Worksheets("Menu").Range("Z1").Value NextInv = LastInv + 1 Worksheets("Invoice").Range("H2").value = NextInv Worksheets("Menu").Range("Z1").value = NextInv End Sub

Sau đó, để lưu Hóa đơn, một cái gì đó như sau:

Sub SaveInvWithNewName() ' Copy Invoice to a new workbook Worksheets("Invoice").Copy NewFN = Range("H2").Value & ".xls" ActiveWorkbook.SaveAs NewFN ActiveWorkbook.Close End Sub