AltTranslationProperties.Add

Adds a GroupProperty to the collection.

Syntax:

Add( Name As XLIFFAltTransAttributes, Value As String, NamespaceURI As String, ExtendedName As String) As AltTransProperty

Return: AltTransProperty

Parameters: Name Name of the property, element of the enumeration XLIFFAltTransAttributes. If the name is not an XLIFF attribute, the name "alttrans_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 AltTransProps As AltTranslationProperties Set AltTransProps = Application.ActiveTransUnit.AltTranslations(1).Properties ' Add Property Dim AltTransProp As AltTranslationProperty Dim OtherAltTransProp As AltTranslationProperty Set AltTransProp = AltTransProps.Add(alttrans_restype, "x-metadata", "", "") Set OtherAltTransProp = AltTransProps.Add(alttrans_x_extended, "MyValue", "x_myproperty", "http://www.mydomain.com") ' Remove Property Call AltTransProps.Remove("alttrans_restype", "") Call AltTransProps.Remove("x_myproperty", "http://www.mydomain.com")

See also:

Class AltTranslationProperties

Syntax:	Add( Name As XLIFFAltTransAttributes, Value As String, NamespaceURI As String, ExtendedName As String) As AltTransProperty
Return:	AltTransProperty
Parameters:	Name Name of the property, element of the enumeration XLIFFAltTransAttributes. If the name is not an XLIFF attribute, the name "alttrans_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 AltTransProps As AltTranslationProperties Set AltTransProps = Application.ActiveTransUnit.AltTranslations(1).Properties ' Add Property Dim AltTransProp As AltTranslationProperty Dim OtherAltTransProp As AltTranslationProperty Set AltTransProp = AltTransProps.Add(alttrans_restype, "x-metadata", "", "") Set OtherAltTransProp = AltTransProps.Add(alttrans_x_extended, "MyValue", "x_myproperty", "http://www.mydomain.com") ' Remove Property Call AltTransProps.Remove("alttrans_restype", "") Call AltTransProps.Remove("x_myproperty", "http://www.mydomain.com")