Project) (Application.SetMatchingField 方法

為符合指定準則的選取任務或資源設定欄位值。

語法

運算式。SetMatchingField (Field， Value， CheckField， CheckValue， CheckTest， CheckOperation， CheckField2， CheckValue2， CheckTest2)

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Field	必要	String	要設定的欄位名稱。
Value	必要	String	設定給欄位的值。
CheckField	必要	String	要檢查的欄位名稱。
CheckValue	必要	String	要與 CheckField指定之欄位值比較的值。
CheckTest	選用	String	CheckField與CheckValue之間的比較類型。 預設值為「等於」。 可以是其中一個 比較字串。
CheckOperation	選用	字串	如果指定，使用 CheckField、 CheckTest和 CheckValue 建立的準則與第二個準則有何關聯。 CheckOperation 自變數可以設定為 「And」 或 「Or」。 預設值為 "And"。
CheckField2	必要	String	要檢查的第二個欄位名稱。
CheckValue2	必要	String	設定給第二個欄位的值。
CheckTest2	選用	Variant	CheckField2 與 CheckValue2之間的比較類型。 可以是與 CheckTest相同的比較字串之一。

比較字串

比較字串	描述
"等於"	CheckField 的值等於 CheckValue。
"不等於"	CheckField 的值不等於 CheckValue。
"大於"	CheckField 的值大於 CheckValue。
"大於或等於"	CheckField 的值大於或等於 CheckValue。
"小於"	CheckField 的值小於 CheckValue。
"小於或等於"	CheckField 的值小於或等於 CheckValue。
"在兩者之間"	CheckField 的值在 CheckValue 之間。
"不在兩者之間"	CheckField 的值不在 CheckValue 之間。
"contains"	CheckField 包含 CheckValue。
"does not contain"	CheckField 不包含 CheckValue。
"contains exactly"	CheckField 完全包含 CheckValue。

傳回值

布林值

範例

下列範例會檢查工作欄位 Name 是否相等、將值變更為 New Task Name ，然後將名稱變更回原始名稱。

Sub Set_MatchingField() 
 
 Dim T As Task 
 Dim OldName As String 
 
 'Save the task name 
 Set T = ActiveProject.Tasks(3) 
 OldName = T.GetField(pjTaskName) 
 
 ViewApply Name:="&Gantt Chart" 
 'Change the field to "New Task's Name" 
 SetMatchingField Field:="Name", Value:="New Task Name", CheckField:="Name", CheckValue:=OldName, CheckTest:="equals" 
 ' Set the field to the old name 
 SetMatchingField Field:="Name", Value:=OldName, CheckField:="Name", CheckValue:="New Task's Name", CheckTest:="equals" 
End Sub

支援和意見反應

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