Resource.GetField Method

  • Article
Project Developer Reference

Returns the value in a field. If the selected field is an estimated duration, the returned value will also include the estimated character.

Syntax

expression.GetField(FieldID)

expression   A variable that represents a Resource object.

Parameters

Name Required/Optional Data Type Description
FieldID Required Long PjField. Can be one of the following constants:
pjResourceAccrueAtpjResourceEnterpriseUniqueID
pjResourceActualCostpjResourceFinish
pjResourceActualOvertimeCostpjResourceFinish1-10
pjResourceActualOvertimeWorkpjResourceFlag1-20
pjResourceActualOvertimeWorkProtectedpjResourceGroup
pjResourceActualWorkpjResourceGroupBySummary
pjResourceActualWorkProtectedpjResourceHyperlink
pjResourceACWPpjResourceHyperlinkAddress
pjResourceAssignmentDelaypjResourceHyperlinkHref
pjResourceAssignmentUnitspjResourceHyperlinkScreenTip
pjResourceAvailableFrompjResourceHyperlinkSubAddress
pjResourceAvailableTopjResourceID
pjResourceBaseCalendarpjResourceIndex
pjResourceBaseline1-10CostpjResourceIndicators
pjResourceBaseline1-10FinishpjResourceInitials
pjResourceBaseline1-10StartpjResourceIsAssignment
pjResourceBaseline1-10WorkpjResourceLevelingDelay
pjResourceBaselineCostpjResourceLinkedFields
pjResourceBaselineFinishpjResourceMaterialLabel
pjResourceBaselineStartpjResourceMaxUnits
pjResourceBaselineWorkpjResourceName
pjResourceBCWPpjResourceNotes
pjResourceBCWSpjResourceNumber1-20
pjResourceBookingTypepjResourceObjects
pjResourceCanLevelpjResourceOutlineCode1-10
pjResourceCodepjResourceOverallocated
pjResourceConfirmedpjResourceOvertimeCost
pjResourceCostpjResourceOvertimeRate
pjResourceCost1-10pjResourceOvertimeWork
pjResourceCostPerUsepjResourcePeakUnits
pjResourceCostRateTablepjResourcePercentWorkComplete
pjResourceCostVariancepjResourcePhonetics
pjResourceCreatedpjResourceProject
pjResourceCVpjResourceRegularWork
pjResourceDate1-10pjResourceRemainingCost
pjResourceDemandedRequestedpjResourceRemainingOvertimeCost
pjResourceDuration1-10pjResourceRemainingOvertimeWork
pjResourceEMailAddresspjResourceRemainingWork
pjResourceEnterprisepjResourceResponsePending
pjResourceEnterpriseBaseCalendarpjResourceSheetNotes
pjResourceEnterpriseCheckedOutBypjResourceStandardRate
pjResourceEnterpriseCost1-10pjResourceStart
pjResourceEnterpriseDate1-30pjResourceStart1-10
pjResourceEnterpriseDuration1-10pjResourceSV
pjResourceEnterpriseFlag1-20pjResourceTaskSummaryName
pjResourceEnterpriseGenericpjResourceTeamStatusPending
pjResourceEnterpriseInactivepjResourceText1-30
pjResourceEnterpriseIsCheckedOutpjResourceType
pjResourceEnterpriseLastModifiedDatepjResourceUniqueID
pjResourceEnterpriseMultiValue20-29pjResourceUpdateNeeded
pjResourceEnterpriseNameUsedpjResourceVAC
pjResourceEnterpriseNumber1-40pjResourceWindowsUserAccount
pjResourceEnterpriseOutlineCode1-29pjResourceWork
pjResourceEnterpriseRBSpjResourceWorkContour
pjResourceEnterpriseRequiredValuespjResourceWorkgroup
pjResourceEnterpriseTeamMemberpjResourceWorkVariance
pjResourceEnterpriseText1-40
pjResourceAccrueAt pjResourceEnterpriseUniqueID
pjResourceActualCost pjResourceFinish
pjResourceActualOvertimeCost pjResourceFinish1-10
pjResourceActualOvertimeWork pjResourceFlag1-20
pjResourceActualOvertimeWorkProtected pjResourceGroup
pjResourceActualWork pjResourceGroupBySummary
pjResourceActualWorkProtected pjResourceHyperlink
pjResourceACWP pjResourceHyperlinkAddress
pjResourceAssignmentDelay pjResourceHyperlinkHref
pjResourceAssignmentUnits pjResourceHyperlinkScreenTip
pjResourceAvailableFrom pjResourceHyperlinkSubAddress
pjResourceAvailableTo pjResourceID
pjResourceBaseCalendar pjResourceIndex
pjResourceBaseline1-10Cost pjResourceIndicators
pjResourceBaseline1-10Finish pjResourceInitials
pjResourceBaseline1-10Start pjResourceIsAssignment
pjResourceBaseline1-10Work pjResourceLevelingDelay
pjResourceBaselineCost pjResourceLinkedFields
pjResourceBaselineFinish pjResourceMaterialLabel
pjResourceBaselineStart pjResourceMaxUnits
pjResourceBaselineWork pjResourceName
pjResourceBCWP pjResourceNotes
pjResourceBCWS pjResourceNumber1-20
pjResourceBookingType pjResourceObjects
pjResourceCanLevel pjResourceOutlineCode1-10
pjResourceCode pjResourceOverallocated
pjResourceConfirmed pjResourceOvertimeCost
pjResourceCost pjResourceOvertimeRate
pjResourceCost1-10 pjResourceOvertimeWork
pjResourceCostPerUse pjResourcePeakUnits
pjResourceCostRateTable pjResourcePercentWorkComplete
pjResourceCostVariance pjResourcePhonetics
pjResourceCreated pjResourceProject
pjResourceCV pjResourceRegularWork
pjResourceDate1-10 pjResourceRemainingCost
pjResourceDemandedRequested pjResourceRemainingOvertimeCost
pjResourceDuration1-10 pjResourceRemainingOvertimeWork
pjResourceEMailAddress pjResourceRemainingWork
pjResourceEnterprise pjResourceResponsePending
pjResourceEnterpriseBaseCalendar pjResourceSheetNotes
pjResourceEnterpriseCheckedOutBy pjResourceStandardRate
pjResourceEnterpriseCost1-10 pjResourceStart
pjResourceEnterpriseDate1-30 pjResourceStart1-10
pjResourceEnterpriseDuration1-10 pjResourceSV
pjResourceEnterpriseFlag1-20 pjResourceTaskSummaryName
pjResourceEnterpriseGeneric pjResourceTeamStatusPending
pjResourceEnterpriseInactive pjResourceText1-30
pjResourceEnterpriseIsCheckedOut pjResourceType
pjResourceEnterpriseLastModifiedDate pjResourceUniqueID
pjResourceEnterpriseMultiValue20-29 pjResourceUpdateNeeded
pjResourceEnterpriseNameUsed pjResourceVAC
pjResourceEnterpriseNumber1-40 pjResourceWindowsUserAccount
pjResourceEnterpriseOutlineCode1-29 pjResourceWork
pjResourceEnterpriseRBS pjResourceWorkContour
pjResourceEnterpriseRequiredValues pjResourceWorkgroup
pjResourceEnterpriseTeamMember pjResourceWorkVariance
pjResourceEnterpriseText1-40

Return Value
String

Example
The following example displays the value of a field specified by the user

Visual Basic for Applications 
  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.<strong class="bterm">GetField</strong>(FieldID:=pjResourceStandardRate))
    Case ""
        End
    Case Else
        MsgBox "You entered an invalid field. Please try again."
        End
End Select



End Sub

See Also