Método Application.CheckField (Project)
True si las tareas o recursos seleccionados cumplen los criterios especificados.
Sintaxis
expresión. CheckField (_Field_, _Value_, _Test_, _Op_, _Field2_, _Value2_, _Test2_)
expresión Variable que representa un objeto Application.
Parámetros
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Field | Obligatorio | String | Nombre del campo en el que se va a buscar. |
| Value | Obligatorio | String | El valor que se va a comparar con el valor del campo especificado por Field. |
| Test | Opcional | String | El tipo de comparación que se realiza entre Field y Value. El valor predeterminado es "igual a". Puede ser una de las siguientes cadenas de comparación. |
| Op | Opcional | Cadena | Cómo se relacionan los criterios establecidos con Field, Test y Value con los segundos criterios. El argumento Op puede establecerse en "Y" o "O". |
| Field2 | Opcional | Cadena | Nombre de un segundo campo en el que se va a buscar. |
| Value2 | Opcional | Cadena | Valor que se va a comparar con el valor del campo especificado con Field2. |
| Prueba 2 | Opcional | Cadena | Tipo de comparación realizado entre Field2 y Value2. Puede ser una de las mismas cadenas de comparación que Test. |
Cadenas de comparación
| Cadena de comparación | Descripción |
|---|---|
| "igual a" | El valor de Field es igual a Value. |
| "no es igual a" | El valor de Field no es igual a Value. |
| "es mayor que" | El valor de Field es mayor que Value. |
| "es mayor o igual que" | El valor de Field es mayor o igual que Value. |
| "es menor que" | El valor de Field es menor que Value. |
| "es menor o igual que" | El valor de Field es menor o igual que Value. |
| "está comprendido en" | El valor de Field está comprendido en Value. |
| "no está comprendido en" | El valor de Field no está comprendido en Value. |
| "contiene" | Field contiene Value. |
| "no contiene" | Campo no contiene Value. |
| "contiene exactamente" | Field contiene exactamente Value. |
Valor devuelto
Variant
Ejemplo:
En el siguiente ejemplo se determina si el valor de Duration es igual a 1 y se muestra un mensaje apropiado.
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
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.