Método Resource.GetField (Project)

Artigo
04/07/2023

Retorna um valor do campo personalizado de recurso especificado.

Sintaxe

expression. GetField( _FieldID_ )

Expressão Uma variável que representa um objeto Resource .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
FieldID	Obrigatório	Long	Para um campo personalizado local pode ser uma das seguintes constantes PjField para campos personalizados de recurso. Para um campo personalizado da empresa, use o método FieldNameToFieldConstant para obter o FieldID.

Valor de retorno

String

Exemplo

O exemplo a seguir exibe o valor de um campo personalizado local especificado pelo usuário.

Sub DisplayField() 
    Dim Temp As String 
 
    Temp = InputBox$("Enter the name of the field you want to see:") 
    Temp = LCase(Temp) 
 
    Select Case Temp 
        Case "name" 
            MsgBox (ActiveCell.Resource.GetField(FieldID:=pjResourceName)) 
        Case "initials" 
            MsgBox (ActiveCell.Resource.GetField(FieldID:=pjResourceInitials)) 
        Case "standard rate" 
            MsgBox (ActiveCell.Resource.GetField(FieldID:=pjResourceStandardRate)) 
        Case "" 
            End 
        Case Else 
            MsgBox "You entered an invalid field. Please try again." 
            End 
    End Select 
End Sub

Para ver um exemplo de um campo personalizado de recurso de empresa, consulte o método SetField.

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.

Partilhar via