sangista192
Thành viên mới
- Tham gia
- 3/12/18
- Bài viết
- 10
- Được thích
- 0
Private Sub UserForm_Initialize()
Dim rG As Range
Set rG = Range("DM")
For i = 1 To rG.Rows.Count
ComboBox1.AddItem Format(rG(i, 1), "hh:mm:ss AM/PM")
Next
End Sub
Vì comboBox trong VBA excel hiện thị item dạng text nên chỉ có cách add như sau
Mã:Private Sub UserForm_Initialize() Dim rG As Range Set rG = Range("DM") For i = 1 To rG.Rows.Count ComboBox1.AddItem Format(rG(i, 1), "hh:mm:ss AM/PM") Next End Sub
Vấn đề khác với tiêu đề của bạn rồi, bạn nên mở bài mới, ví dụ "Tìm giá trị tương ứng khi ComboBox thay đổi"Bây giờ lại phát sinh ra 1 vấn đề là cái list nó không đi theo ạ. Giờ em chọn giờ rồi chỗ Tên nó chạy theo giờ. giúp giùm ạ.