Partilhar via

Objeto OutlineCode (Project)

  • Artigo

Representa um código de estrutura de tópicos local no projeto. O objeto OutlineCode é um membro da coleção OutlineCodes.

Usando o objeto OutlineCode

O exemplo a seguir adiciona um código de estrutura de tópicos, personalizado para armazenar o local dos recursos, e configura o código de estrutura de tópicos, de modo que somente os valores especificados na tabela de pesquisa possam ser associados a um recurso.

Sub CreateLocationOutlineCode() 
    Dim objOutlineCode As OutlineCode 
 
    Set objOutlineCode = ActiveProject.OutlineCodes.Add( _
        pjCustomResourceOutlineCode1, "Location") 
 
    objOutlineCode.OnlyLookUpTableCodes = True 
 
    DefineLocationCodeMask objOutlineCode.CodeMask 
    EditLocationLookupTable objOutlineCode.LookupTable 
End Sub 
 
 
Sub DefineLocationCodeMask(objCodeMask As CodeMask) 
    objCodeMask.Add _
        Sequence:=pjCustomOutlineCodeUppercaseLetters, _
        Length:=2, Separator:="." 
 
    objCodeMask.Add _ 
        Sequence:=pjCustomOutlineCodeUppercaseLetters, _
        Separator:="." 
 
    objCodeMask.Add _
        Sequence:=pjCustomOutlineCodeUppercaseLetters, _
        Length:=3, Separator:="." 
End Sub 
 
 
Sub EditLocationLookupTable(objLookupTable As LookupTable) 
    Dim objStateEntry As LookupTableEntry 
    Dim objCountyEntry As LookupTableEntry 
    Dim objCityEntry As LookupTableEntry 
 
    Set objStateEntry = objLookupTable.AddChild("WA") 
    objStateEntry.Description = "Washington" 
 
    Set objCountyEntry = objLookupTable.AddChild("KING", _
        objStateEntry.UniqueID) 
    objCountyEntry.Description = "King County" 
 
    Set objCityEntry = objLookupTable.AddChild("SEA", _
        objCountyEntry.UniqueID) 
    objCityEntry.Description = "Seattle" 
 
    Set objCityEntry = objLookupTable.AddChild("RED", _
        objCountyEntry.UniqueID) 
    objCityEntry.Description = "Redmond" 
 
    Set objCityEntry = objLookupTable.AddChild("KIR", _
        objCountyEntry.UniqueID) 
    objCityEntry.Description = "Kirkland" 
End Sub

Comentários

Um código de estrutura de tópicos é um tipo de campo personalizado local que tem uma tabela de pesquisa de texto hierárquico. Campos personalizados da empresa do tipo texto com tabelas de pesquisa hierárquico agir como códigos de estrutura de tópicos. Use a propriedade OutlineCodes para retornar uma coleção OutlineCodes. Use o método Add para adicionar um código de estrutura de tópicos local à coleção OutlineCodes. Para adicionar um campo personalizado da empresa, você deve usar Project Web App ou o Project Server Interface (PSI).

Métodos

Nome
Delete

Propriedades

Nome
Application
CodeMask
DefaultValue
FieldID
Índice
LinkedFieldID
LookupTable
MatchGeneric
Nome
OnlyCompleteCodes
OnlyLeaves
OnlyLookUpTableCodes
Responsável
RequiredCode
SortOrder

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.