Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/mysql/63.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Mysql Excel字符串中的多字替换_Mysql_Sql_Vba_Excel - Fatal编程技术网

Mysql Excel字符串中的多字替换

Mysql Excel字符串中的多字替换,mysql,sql,vba,excel,Mysql,Sql,Vba,Excel,大家好 我正在做一个excel项目,我正在寻求帮助。我不介意这是通过公式还是脚本来解决的 首先,我将提供大局。我有一大堆SQL查询,它们从不同的位置调用不同的字段。这些字段名称现在已更改。我想用字段的新名称更新SQL查询。因此,我打算将所有查询复制到excel电子表格中,然后查找字符串中的字段名,并将其替换为另一个工作表中表格中的新字段名。问题是每个查询大约有10个字段名需要替换 这就是我的想法。基本上,如果我在单元格A1中有一个字符串,上面写着:“我们是最棒的”。对于字符串中存在的每个单词,我

大家好

我正在做一个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栏加上新词。