Tìm nơi lưu thông tin CustomProperties

  • Thread starter Thread starter sealand
  • Ngày gửi Ngày gửi
Liên hệ QC

sealand

Thành viên gạo cội
Tham gia
16/5/08
Bài viết
4,883
Được thích
7,688
Giới tính
Nam
Nghề nghiệp
Kế Toán
Mình có đoạn code ví dụ sau:

Mã:
Sub Test()
Dim i
For i = 1 To 10
Sheet1.CustomProperties.Add "SEALAND" & i, "GPE" & i
Next
End Sub

Khi mình lấy thông tin có thể áp dụng như sau:

Mã:
Sub Test()
Dim i
For i = 1 To 10
msgbox Sheet1.CustomProperties.Item(i).Name & _
vbTab & Sheet1.CustomProperties.Item(i).Value
Next
End Sub

Mình tìm chưa ra nơi lưu giữ thông tin CustomProperties. Nhờ các bạn giúp mình tìm nó ở đâu?.
 
Web KT

Bài viết mới nhất

Back
Top Bottom