Mysql Excel字符串中的多字替换
大家好 我正在做一个excel项目,我正在寻求帮助。我不介意这是通过公式还是脚本来解决的 首先,我将提供大局。我有一大堆SQL查询,它们从不同的位置调用不同的字段。这些字段名称现在已更改。我想用字段的新名称更新SQL查询。因此,我打算将所有查询复制到excel电子表格中,然后查找字符串中的字段名,并将其替换为另一个工作表中表格中的新字段名。问题是每个查询大约有10个字段名需要替换 这就是我的想法。基本上,如果我在单元格A1中有一个字符串,上面写着:“我们是最棒的”。对于字符串中存在的每个单词,我想检查它是否存在于另一个工作表中的表中。如果表中存在该单词,请将其替换。如果没有,则转到下一个单词。继续计算单元格中的每个单词 非常感谢您提供的任何帮助。提前谢谢 考虑:Mysql Excel字符串中的多字替换,mysql,sql,vba,excel,Mysql,Sql,Vba,Excel,大家好 我正在做一个excel项目,我正在寻求帮助。我不介意这是通过公式还是脚本来解决的 首先,我将提供大局。我有一大堆SQL查询,它们从不同的位置调用不同的字段。这些字段名称现在已更改。我想用字段的新名称更新SQL查询。因此,我打算将所有查询复制到excel电子表格中,然后查找字符串中的字段名,并将其替换为另一个工作表中表格中的新字段名。问题是每个查询大约有10个字段名需要替换 这就是我的想法。基本上,如果我在单元格A1中有一个字符串,上面写着:“我们是最棒的”。对于字符串中存在的每个单词,我
Sub FixIt()
Dim r As Range, A As Range
Dim s1 As Worksheet, s2 As Worksheet
Set s1 = Sheets("Sheet1")
Set s2 = Sheets("Sheet2")
Set A = s1.Range("A:A").Cells.SpecialCells(xlCellTypeConstants)
For Each r In A
v = " " & r.Value & " "
For j = 1 To 10
oldv = " " & s2.Cells(j, 1).Text & " "
newv = " " & s2.Cells(j, 2).Text & " "
v = Replace(v, oldv, newv)
Next j
r.Value = Trim(v)
Next r
End Sub
在本例中,替换表位于第2页,单元格A1到B10…………我用“空格”填充,以确保整个单词替换,并避免需要拆分和连接我认为替换词在另一页中定义?是的,替换词将在另一页中定义。我会在A栏加上原件,在B栏加上新词。