RC-WinTrans Object Model Help | 
  SubFileProperties.Count
 | 
Type Info:  | 
	 Count As Long  | 
  
| Example: | Dim SubFileProps As SubFileProperties Dim NumberOfProperties As Long Set SubFileProps = Application.ActiveProjectFile.SubFiles(1).Properties NumberOfProperties = SubFileProps.Count  | 
  
| Remarks: | Read-only property. |