Project) (Application.Replace 方法

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

语法

表达式替换 (字段测试值、替换、ReplaceAll下一步MatchCaseFieldIDTestID)

expression:表示 Application 对象的变量。

参数

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

比较字符串

比较字符串 说明
"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" 字段 恰好包含

返回值

Boolean

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

备注

使用 Replace 方法时不带参数,或不指定 FieldTestValue,将显示已为上一个状态设置选项的 Replace 对话框。

若要替换所有可用域中的某个值,请使用 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。