Cacher is the code snippet organizer for pro developers

' For complete examples and data files, please go to https://github.com/groupdocsmetadata/GroupDocs_Metadata_NET
' initialize XlsFormat
Dim xlsFormat As New XlsFormat(Common.MapSourceFilePath(filePath))

' initialize XlsMetadata
Dim metadata As XlsMetadata = xlsFormat.DocumentProperties

Dim propertyName As String = "New Custom Property"
Dim propertyValue As String = "123"

' check if property already exists
If Not metadata.ContainsKey(propertyName) Then
    ' add property
    metadata.Add(propertyName, propertyValue)
End If

' save file in destination folder
xlsFormat.Save(Common.MapDestinationFilePath(filePath))