共用方式為


(Project) 的 Resource.Flag12 屬性

True 是表示 如果設定 資源 相關聯的旗標。 讀取/寫入 Variant

語法

expressionFlag12

表達 代表 Resource 物件的變數。

範例

下列範例會刪除已 Flag1 設為 True 的所有工作。

Sub DeleteNonEssentialTasks() 
 
 Dim T As Task ' Task object used in For Each loop 
 
 ' Delete nonessential tasks in the active project. 
 For Each T In ActiveProject.Tasks 
 If Not (T Is Nothing) Then 
 If T.Flag1 = True Then T.Delete 
 End If 
 Next T 
 
End Sub

支援和意見反應

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