office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

VBA中如何清空集閤Collection中的內容呢

2019-07-07 09:45:00
zstmtony
原創
1792

VBA中 集閤Collection中沒有直接清除Clear的方法,隻能靠自己寫代碼


方法一:


lngCnt = 0
lngCnt = lstCustomer.count
If lngCnt > 0 Then
 e = lngCnt
 Do Until e = 0
   lstCustomer.Remove (e)
   e = e - 1
 Loop
End If

方法二:

直接對對象釋放

 Set mcollQq = Nothing
 Set mcollQq = New Collection

分享