如何在excel表格中插入多段的文字?
发布网友
发布时间：2022-04-23 08:57
共2个回答
热心网友
时间：2022-06-18 17:18
'打开表格-按ALT+11-点击插入-点击模块-粘贴代码
Function 加入人名(a As String, b As String)
c = Split(b, ":", -1, 1)
For i = 0 To UBound(c) - 1
t = t & c(i) & ":" & a
Next
加入人名 = t & "；"
End Function
'打开表格-按ALT+11-点击插入-点击模块-粘贴代码
Function 加入人名(a As String, b As String)
c = Split(b, ":", -1, 1)
For i = 0 To UBound(c) - 1
t = t & c(i) & ":" & a
Next
加入人名 = t & "；"
For abcdefg = 1 To 100
If abcdefg = 1 Then
Else
If abcdefg = 2 Then
Else
If abcdefg = 3 Then
Else
If abcdefg = 4 Then
Else
End If
End If
End If
End If
Next
End Function
热心网友
时间：2022-06-18 17:18
可以用替换函数；substitute
举例：=SUBSTITUTE(B1,":;",":"&A1&";")
举例
注意：冒号和分号要根据数据原本的格式来匹配，否则是查找不到的，就如我图中最后一对冒号和分号，因为分号是中文格式，所以匹配不到，需要写个嵌套的公式来匹配第二次：=SUBSTITUTE(SUBSTITUTE(B1,":;",":"&A1&";"),":；",":"&A1&"；")
