excel怎么把批量换名称

B1="#"&LEFT(A1,FIND("(",A1)-1)&"sz"&MID(A1,FIND("(",A1)+1,FIND(")",A1)-FIND("(",A1)-1)&"[股票]#"
下拉公式
注意 A列 括号的写法和公式里的写法要一致

名称的话可以用VBA建立

Sub 定义名称()
For i = 3 To Sheet1[A65536]End(xlUp)Row
    j = Sheet1Cells(i, 1000)End(xlToLeft)Column
    ActiveWorkbookNamesAdd Name:=Cells(i, 1), RefersToR1C1:="=Sheet1!R" & i & "C2:R" & i & "C" & j
Next
End Sub

'测试结果如下

从第三行开始执行，支持65536行和1000列范围内的名称定义

---