Em cũng bị như Bạn, nhờ Thầy chỉ lỗi sai ạ
Chào bạn combobox bạn có thể tạo theo cách sau:
Private Sub UserForm_Initialize()
Dim dc As Long
dc = Sheet1.Range("A" & Sheet1.Rows.Count).End(xlUp).Row
Dim arr As Variant
arr = Sheet1.Range("A1:A" & dc).Value
ComboBox1.List = arr
End Sub
Cám ơn Thầy