Create a Custom Property

[scking]

I want to create a custom property in Excel. At one time I saw the snippet of code that performed that but can't find it again. The help file is totally inadequate, just telling me how to get the value of a custom property but not how to create it.

Retrieve the value:
CustomDocumentProperties.Item("Complete&quot

I verify the column titles and formats and would like to have a user property where I could store the results.

Growth follows a healthy professional curiosity

 

[acron]

Can you develop this, taken from XL2002 help.

With ActiveDocument.CustomDocumentProperties
    .Add Name:="CustomNumber", _
        LinkToContent:=False, _
        Type:=msoPropertyTypeNumber, _
        Value:=1000
    .Add Name:="CustomString", _
        LinkToContent:=False, _
        Type:=msoPropertyTypeString, _
        Value:="This is a custom property."
    .Add Name:="CustomDate", _
        LinkToContent:=False, _
        Type:=msoPropertyTypeDate, _
        Value:=Date
End With

AC