GroupProperties.Add

Adds a GroupProperty to the collection.

Syntax:

Add( Name As XLIFFGroupAttributes, Value As String, NamespaceURI As String, ExtendedName As String) As GroupProperty

Return: GroupProperty

Parameters: Name Name of the property, element of the "XLIFFGroupAttributes" enumeration. If the name is not an XLIFF attribute, the name "group_x_extended" must be used.
Value Value of the property.
NamespaceURI Namespace URI of the property. If the property is an XLIFF attribute, the namespace URI is an empty string.
ExtendedName If the property is an XLIFF attribute, the extended name is an empty string. Otherwise the extended name should begin with "x_".

Example:
Dim GroupProps As GroupProperties Set GroupProps = Application.ActiveProjectFile.SubFiles(1).Groups(1).Properties ' Add Property Dim GroupProp As GroupProperty Dim OtherGroupProp As GroupProperty Set GroupProp = GroupProps.Add(group_restype, "x-metadata", "", "") Set OtherGroupProp = GroupProps.Add(group_x_extended, "MyValue", "x_myproperty", "http://www.mydomain.com") ' Remove Property Call GroupProps.Remove("group_restype", "") Call GroupProps.Remove("x_myproperty", "http://www.mydomain.com")

See also:

Class GroupProperties

Syntax:	Add( Name As XLIFFGroupAttributes, Value As String, NamespaceURI As String, ExtendedName As String) As GroupProperty
Return:	GroupProperty
Parameters:	Name Name of the property, element of the "XLIFFGroupAttributes" enumeration. If the name is not an XLIFF attribute, the name "group_x_extended" must be used. Value Value of the property. NamespaceURI Namespace URI of the property. If the property is an XLIFF attribute, the namespace URI is an empty string. ExtendedName If the property is an XLIFF attribute, the extended name is an empty string. Otherwise the extended name should begin with "x_".
Example:	Dim GroupProps As GroupProperties Set GroupProps = Application.ActiveProjectFile.SubFiles(1).Groups(1).Properties ' Add Property Dim GroupProp As GroupProperty Dim OtherGroupProp As GroupProperty Set GroupProp = GroupProps.Add(group_restype, "x-metadata", "", "") Set OtherGroupProp = GroupProps.Add(group_x_extended, "MyValue", "x_myproperty", "http://www.mydomain.com") ' Remove Property Call GroupProps.Remove("group_restype", "") Call GroupProps.Remove("x_myproperty", "http://www.mydomain.com")