Tự động tạo số sê-ri bằng mã VBA trong Excel
Nhập mẫu dữ liệu như sau: "A10225R201100066 A" làm giá trị ban đầu tại thanh ghi A1. Liệu VBA có thể giúp tạo ra dữ liệu liên tục, ví dụ như A10225R201100067 A, A10225R201100068 A, A10225R201100069 A, A10225R201100070 A, A10225R201100071 tiếp tục từ A2 đến A6 không? A10225R201100066 A A10225R201100067 A A10225R201100068 A A10225R201100069 A A10225R201100070 A Trả lời: Đoạn mã bên dưới tự động phát hiện số bên trong từ cuối chuỗi. Andreas. Sub Test() Làm mờ phạm vi, phạm vi này Dim S As String Dim i As Long, f As Long, t As Long Dim n As Variant 'Hãy điền thông tin vào tất cả các ô, ô đầu tiên phải chứa số sê-ri' Đặt Where = Range("A1:A6") 'Hãy ghé thăm từng tế bào' Đối với mỗi điều này ở đâu 'Số sê-ri đã được phân tích?' Nếu i = 0 thì 'Lấy nội dung dưới dạng chuỗi S = Giá trị này 'Từ cuối cùng đến đầu tiên, hãy tìm vị trí của số bên trong Đối với i = Len(S) Đến 1 Bước -1 Nếu...
