Hướng dẫn 2 cách Tạo Name Động trong Excel (không VBA và có VBA) | VBA từ cơ bản đến nâng cao

Chào thầy. Thầy cho em hỏi là em có ds học sinh 7 lớp. Em tạo 7 button để khi click button thì listbox sẽ load dữ liệu từ lớp đó lên. Giờ em muốn tạo thêm button in dữ liệu. Khi click in thì content trong listbox đang hiện sẽ dc in ra thì mình code như thế nào. Hi vọng dc thầy giúp đỡ

[@tranvanbinh2660]

Khi thêm sản phẩm mới thì Name tự động tạo ra

[@nguyenduc99]

Chào thầy. Cái listNV thì tạo được danh sách sổ xuống, còn cái ListSP thì không tạo được vì trong Code VBA có 02 cột A và B (Sheets("KhaiBao").Range("A4:B" & lr).Name = "ListSP"). Thầy có thể tạo danh sách sổ xuống hiển thị 02 cột được không ạ. Cảm ơn thầy!

[@tranvanbinh2660]

Ý tưởng củ mình định làm như này được không
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Thoat
With Target
If .Column = 1 And .Row > 3 And .Count = 1 And .Value vbNullString Then
If Application.WorksheetFunction.CountIf(Range("A4:A" & .Row - 1), .Value) > 0 Then
MsgBox "Ten san pham ton tai"
.Select
End If
End If
End With
Thoat: Exit Sub
' Call Tao_Name...
' Call Tao_Name...
End Sub