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:
Khi mình lấy thông tin có thể áp dụng như sau:
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?.
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?.