Método Application.CheckField (Project)
True se as tarefas ou recursos selecionados de acordo com os critérios especificados.
Sintaxe
expression. CheckField
(_Field_
, _Value_
, _Test_
, _Op_
, _Field2_
, _Value2_
, _Test2_
)
expressão Uma variável que representa um Aplicativo objeto.
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Field | Obrigatório | String | O nome do campo a ser pesquisado. |
Value | Obrigatório | String | O valor a ser comparado com o valor do campo especificado com Field. |
Test | Opcional | String | O tipo de comparação feita entre Field e Value. O valor padrão é "é igual a". Pode ser uma das cadeias de caracteres de comparação a seguir. |
Op | Opcional | String | Como os critérios estabelecidos com Campo, Teste e Valor se relacionam com o segundo critério. O argumento Op pode ser definido como "E" ou "Ou". |
Field2 | Opcional | String | O nome de um segundo campo a ser pesquisado. |
Value2 | Opcional | String | O valor a ser comparado com o valor do campo especificado com Field2. |
Test2 | Opcional | String | O tipo de comparação feita entre Field2 e Value2. Pode ser uma das mesmas cadeias de caracteres de comparação queTest. |
Cadeias de caracteres de comparação
Cadeia de comparação | Descrição |
---|---|
"é igual a" | O valor de Campo é igual ao de Valor. |
"é diferente de" | O valor de Campo é diferente do de Valor. |
"é maior que" | O valor de Campo é maior que o de Valor. |
"é maior ou igual a" | O valor de Campo é maior ou igual ao de Valor. |
"é menor que" | O valor de Campo é menor que o de Valor. |
"é menor ou igual a" | O valor de Campo é menor ou igual ao de Valor. |
"está contido em" | O valor de Campo está contido em Valor. |
"não está contido em" | O valor de Campo não está contido em Valor. |
"contém" | Campo contém valor. |
"não contém" | Campo não contém valor. |
"contém exatamente" | Campo contém Value exatamente. |
Valor de retorno
Variantes
Exemplo
O exemplo a seguir determina se o valor de Duration é igual a 1 e exibe uma mensagem apropriada.
Sub Check_Field()
Dim T As Task
Dim Result As Boolean
Set T = ActiveProject.Tasks(3)
Result = CheckField("Duration", "1", "equals")
If Result Then
Result = MsgBox(T.GetField(pjTaskName) + " task Duration is equal to value specified.", vbOKOnly, "CheckField Method")
Else
Result = MsgBox(T.GetField(pjTaskName) + " task Duration is not equal to value specified.", vbOKOnly, "CheckField Method")
End If
End Sub
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.