Application.Replace 方法 (Project)

搜索未筛选的值并将其替换为指定的值。

语法

表达式替换 (FieldTestValueReplaceReplaceAllNextMatchCaseFieldIDTestID)

expression:表示 Application 对象的变量。

参数

名称 必需/可选 数据类型 说明
Field 可选 String 要搜索的域的名称。
Test 可选 String 字段 之间进行比较的类型。 可以是 比较字符串之一。
可选 Variant 与 Field 中指定的字段的值进行比较的值。
Replacement 可选 Variant 使用“” (空字符串) 清除满足 TestValue 指定的测试的 Field
ReplaceAll 可选 Variant 如此 如果 Value的所有内容将被都替换。 如果只将被替换的第一个匹配项。 默认值为 False
Next 可选 Variant 如此 如果项目搜索下匹配的下一个匹配项的搜索标准。 如果项目搜索功能的下一个匹配项。 默认值为 True
MatchCase 可选 Variant 搜索条件要区分大小写。 默认值为 False
FieldID 可选 Variant 字段标识号可以是 PjField 常量之一。 FieldID 优先于任何 Field 值。
TestID 可选 Variant 测试标识号可以是 PjComparison 常量之一。 TestID 优先于任何 Test 值。

比较字符串

比较字符串 Description
"equals" Field 的值等于 Value
"does not equal" Field 的值不等于 Value
"is greater than" Field 的值大于 Value
"is greater than or equal to" Field 的值大于或等于 Value
"is less than" Field 的值小于 Value
"is less than or equal to" Field 的值小于或等于 Value
"is within" Field 的值在 Value 之内。
"is not within" Field 的值不在 Value 之内。
"contains" 字段 包含
"does not contain" 字段 不包含
"contains exactly" 字段 正好包含 Value

返回值

Boolean

True如果进行任何替换。否则为 False

备注

使用不带任何参数或未指定 FieldTestValueReplace 方法,将显示“替换”对话框,其中包含为上一状态设置的选项。

若要替换所有可用域中的某个值,请使用 ReplaceEx 方法。

示例

以下示例中的任一语句将优先级等于或高于 800 的所有任务降级到优先级 600。

Sub LowerPriority() 
    Replace Field:="Priority", Test:="is greater than or equal to", Value:="800", _ 
        Replacement:="600", ReplaceAll:=True 
    Replace Field:="xx", Test:="xx", FieldID:=pjTaskPriority, TestID:=pjCompareGreaterThanOrEqual, _ 
        Value:="800", Replacement:="600" 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。