Nguyễn Thị Ngân
Nguyễn Thị Ngân
Thảo luận 4 thảo luận
Vỗ tay 0 vỗ tay
Lượt xem 115 lượt xem

Sửa lỗi danh sách hàng giúp e

Sửa lỗi danh sách hàng giúp e

Thảo luận 4 câu trả lời
Lượt xem 115 lượt xem
Vỗ tay vỗ tay
Nguyễn Thị Ngân 06:10 - Oct 12, 2021

Chào bạn bạn mô tả bằng cả hình ảnh giúp gitiho dc khokng?

Vỗ tay vỗ tay
Nguyễn Thị Ngân 05:10 - Oct 13, 2021
Private Sub UserForm_Initialize()
Dim ChonTen As Object
For Each ChonTen In Sheet1.Range("List_Tenhang")
      cb_dshang.AddItem ChonTen
Next
End Sub


Lỗi hiển thị: Runtime Errro
Type Missmath


Vỗ tay vỗ tay
Nguyễn Thị Ngân 05:10 - Oct 13, 2021

Câu lênh lấy ĐVT viết thế nào ạ?

Vỗ tay vỗ tay
Nguyễn Thị Ngân 08:10 - Oct 13, 2021

Chào bạn bạn đã có list tên hàng trong name range chưa nhỉ? nếu cách đó không được bạn thử với cách sau

Option Explicit
Private Sub UserForm_Initialize()
     Call loadbophan
End Sub
Sub loadbophan()
    Dim dc As Long, arr As Variant
    dc = Sheet1.Range("A" & Sheet1.Rows.Count).End(xlUp).Row
    arr = Sheet1.Range("A2:A" & dc).Value
    cb_BoPhan.Clear
    If (IsArray(arr)) Then
        cb_BoPhan.List = arr
    End If
End Sub
Vỗ tay vỗ tay
Câu hỏi liên quan
© 2020 - Bản quyền của Công Ty Cổ Phần Công Nghệ Giáo Dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông