Application.ProjectBeforeAssignmentChange 事件 (Project)

發生在使用者變更工作分派欄位的值之前。

語法

expression。 ProjectBeforeAssignmentChange( _asg_, _Field_, _NewVal_, _Cancel_ )

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
asg	必要	Assignment	欄位將有所變更的工作分派。
Field	必要	PjAssignmentField	變更 [] 欄位。 如果會在使用者變更多個欄位，每個欄位變更都會觸發此事件。 可以是下列其中一個 PjAssignmentField 常數。
NewVal	必要	Variant	欄位 與指定之欄位的新值。
Cancel	必要	布林值	False 事件發生時。 如果事件程序會將此引數設定為 True ，不會變更 欄位 與指定之欄位的值。

註解

當專案內嵌在另一份檔或應用程式中時，不會發生專案事件。

ProjectBeforeAssignmentChange 事件不會發生當時幅資料變更，整個資源或任務列會貼上，當工作分派變更為拖放作業的資源使用狀況檢視中，在操作資源資料庫，當插入或移除子專案時，安裝，或是已在使用自訂表單進行變更時的結果。 如需詳細資訊，請參閱使用 Application 和 Project 物件的相關事件。

範例

下列範例會檢查新的資源分派及則加以取消並針對指定的資源。 這個範例需要新的類別模組和其他程式碼它才會生效。

Private Sub App_ProjectBeforeAssignmentChange(ByVal asg As Assignment, ByVal Field As PjAssignmentField, _ 
    ByVal NewVal As Variant, Cancel As Boolean) 
 
    If Field = pjAssignmentResourceName And NewVal = "Lisa Jones" Then 
        MsgBox "Lisa is no longer available for assignment!" 
        Cancel = True 
    End If 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。