Tag: replace

用通配符查找并replace

我想通过使用查找和replace来更改200×200表中的公式。 我的旧公式是='Sheet1'!A1*IF(B4=C2,1,0) ，我想用=('Sheet1'!A1-'Sheet1'!B1)*IF(B4=C2,1,0) 由于每次做一个单元格都很乏味，我试图使用find和replace，但是我不能保留引用的单元格。 有没有办法做到这一点？ 这是我的数据的第一个单元格的样子 我不能填写或正确的，因为如果我填写下来，我想保留参考C2，同时改变对B4的引用（如B4-$C$2 ），而如果我填写的权利，我想保留对B4和改变对C2的引用（例如$B$4-C2 ）

VBA / Excel – 仅当单元格不包含公式时才replace值

我试图使用replace函数来改变一些值，但是我现在正在做的方式会改变重要公式中的值。 我怎样才能使replace函数只在没有公式的单元格内工作？ 我试过If Not Columns（“I”）。HasFormula然后，如果find一个公式，可以防止整个列的replace工作。 Columns("I").Replace What:="10", _ Replacement:="Five", _ LookAt:=xlPart, _ SearchOrder:=xlByRows, _ MatchCase:=False, _ SearchFormat:=False, _ ReplaceFormat:=False Columns("I").Replace What:="9", _ Replacement:="Four", _ LookAt:=xlPart, _ SearchOrder:=xlByRows, _ MatchCase:=False, _ SearchFormat:=False, _ ReplaceFormat:=False Columns("I").Replace What:="8", _ Replacement:="Three", _ LookAt:=xlPart, _ SearchOrder:=xlByRows, _ MatchCase:=False, _ SearchFormat:=False, _ ReplaceFormat:=False Columns("I").Replace What:="7", _ Replacement:="Three", _ LookAt:=xlPart, _ SearchOrder:=xlByRows, […]

dynamicreplace编辑器中的string

我正在寻找一个解决scheme：我想把特定的文本replace成其他格式的string 防爆。 select * from tab where col like'％ ab-de ％'=> select * from tab where regexp（col，' ab-de （| $ | \。\ :)'） select* from tab where col like'％ 9-01 ％'=> select * from tab where regexp（col，' 9-01 （| $ | \。\ :)' 所以在这里，基本上我想要replacestring（ ab-de or 9-01 ），无论在％ x ％ =>需要在regexp第二个参数中放置完全相同的string。 （ regexp(col, 'x( |$|\.\: […]

vlookup和replace – 性能改进

我想创build一个macros，它将在另一个工作表中查找，并通过另一个用户定义的值更改vlook up单元格中的值。 我写了一个非常基本的代码，完全满足了我的需求，但速度非常慢，一次运行需要将近3分钟。 你可以请build议一个更简单的出路，或者只是build议我的代码有什么问题。 Private Sub CommandButton1_Click() Dim myCell As Range Dim myLookup Dim i As Integer i = Sheets("Modify Order").Cells(5, 2).Value For Each myCell In Sheets("Customer List").Range("E:E") If myCell.Value = Sheets("Modify Order").Cells(4, 2).Value Then myCell.Offset(0, i).Value = Sheets("Modify Order").Cells(7, 2).Value End If Next myCell MsgBox "Done!" End Sub

使用vbscript在Excel中replace小数部分

作为一个更大的脚本的一部分，我试图用Excel中的十进制值replace小数值使用VBScript。 我总是可以指望具有特定列和特定格式的值。 Excel示例预期input列B： 51-7/16 1-1/2 2 15-7/8 Excel示例所需的输出列B： 51.4375 1.5 2 15.875 我知道这将永远是一个1/16。 所以我的想法是通过列表寻找每个可能的分数，find一个包含该分数的单元格，并将其replace为相应的小数。 问题：如何告诉脚本查找包含值的单元格，以及如何用小数点replace该分数？ 最接近的例子search和使用VBscript在Excel中replace一些字符 尝试： Dim FMember (14) FMember(0) = "-1/16" FMember(1) = "-1/8" FMember(2) = "-3/16" FMember(3) = "-1/4" FMember(4) = "-5/16" FMember(5) = "-3/8" FMember(6) = "-7/16" FMember(7) = "-1/2" FMember(8) = "-9/16" FMember(9) = "-5/8" FMember(10) = "-11/16" FMember(11) = […]

replace为相同的因此发生在Excel中的单词

我有一个叫做Add_type的excel列，它具有地址types Add_type route Sub-locality locality administrative_area_level_1 country postal_code premise Sub-locality Sub-locality administrative_area_level_1 country Sub-locality Sub-locality Sub-locality 所以我期望的是，如果连续出现单词“Sub-locality”，那么第二次出现应该被Sub-locality1replace，如果连续出现三次“Sub-locality”，那么第二次应该被replace为“Sub-locality1 “和第三个”Sub-locality2“我尝试了=IF(A8=A9,"Sub-locality1",A8)但是这并不能解决问题 这样我的输出看起来像 route Sub-locality locality administrative_area_level_1 country postal_code premise Sub-locality Sub-locality1 administrative_area_level_1 country Sub-locality Sub-locality1 Sub-locality2 任何build议如何做到这一点。 任何帮助将非常感激。 谢谢。

查找和replace多个字段？

我正在努力寻找解决我的问题。 我有两个Excel文档，一个是“现有电子邮件地址”字段，另一个是“新客户电子邮件地址” 我不想发送电子邮件到“现有的电子邮件地址”，所以我需要search“新的客户端电子邮件地址”任何“现有的电子邮件地址”，并将其删除， 不幸的是，我不想find和replace数百个领域。 任何帮助将非常感激，谢谢乔希

用Excel文件中的单个值replace或重新编码几个不同的值

我有一个Excel工作表，其中包含多个列中的数据。 对于一个特定的列，我将需要使用Excel将值10之间的所有值（例如10到15）replace为值1，将值16和20之间的值replace为值2等等。 我知道如何做一个单一的价值; 即：我可以将值10replace为1，11replace为1等等。 但这将是一个乏味的练习。 有一些可以执行这个任务的代码行吗？ 谢谢你的帮助。 问候，阿里

Excelmacro使用不同的工作表中指定的值来search和replace单元格值

我发现这个，但是不起作用。 不知道我在做什么错。 在工作表1中，我想search并replace某些术语。 如白与WH，粉与PK，双音与TT，黄与黄等。 我在第三张表中列出了在一列中find的内容以及在下一列的同一行中replace的内容。 现在我想使用这些值并通过一个macros来运行它，并将其replace为表1中的值。 谢谢， Can any one help me correct this code or help test it. Sub multiFindNReplace() Dim myList, myRange Set myList = Sheets("sheet3").Range("A8:B10") 'two column range where find/replace pairs are Set myRange = Sheets("sheet3").Range("D1:F100") 'range to be searched For Each cel In myList.Columns(1).Cells myRange.Replace what:=cel.Value, replacement:=cel.Offset(0, 1).Value Next cel End […]

Excel – VBA：使“replace”function更具体

我目前遇到了一个似乎并不难解决的问题，但是，我却找不到一个干净的方法。 我正在使用“replace”function来更改用户键入的句子中的某些expression式。 例如，如果用户键入“va”，我希望它被转换成“VA”，所以它将更容易地与我的数据库匹配以进一步操作。 这是我的简单代码来做到这一点 ： sMain.Range("J3").Replace "VA", "VA" 它运作良好。 问题在于， 不仅将“VA”看作个人expression，而且还将其看作是词的一部分 。 所以，如果我的用户input“梵蒂冈”，它会变成：“VAtican”…当然我不想要。 你知道如何轻松地指定我的代码，使其只考虑replace匹配expression式的整个单词 ？ （我有几十行这样的replace是如此理想，如果可能，最好直接采取“replace”function）。 提前致谢 ！