Xin giúp chuyển kiểu OLEObject sang ComboBox

Liên hệ QC

doveandrose

hello
Tham gia
3/7/09
Bài viết
2,375
Được thích
2,264
em thực hiện việc tạo mới 1 combobox bằng cách
Mã:
Dim cbx As ComboBox
Set cbx = mysheet.OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, DisplayAsIcon:=False).Object
nhưng khi xem các thuộc tính của cbx bằng cách gõ tổ hợp phím Ctr + Space thì không nhìn thấy các thuộc tính quen thuộc như .Name ,.Top,.Height , .... mặc dù nếu gõ cbx.Name thì code vẫn hoạt động

còn nếu thực hiện theo kiểu
Mã:
Dim cbx1 As OLEObject
Set cbx1 = mysheet.OLEObjects.Add(ClassType:="Forms.ComboBox.1", Link:=False, DisplayAsIcon:=False)
thì có nhìn thấy các thuộc tính .Name ,.Top,.Height , .... Nhưng lại không thể sử dụng các thuộc tính riêng cho combobox như : .Additem
Vậy em phải sử dụng kiểu dữ liệu nào để nhìn thấy đầy đủ các thuộc tính trên ?
 
Web KT
Back
Top Bottom