5个回答
展开全部
如果每个单元格的数值都不一样,就好办。请备份你的数据表!
原理:先提取A列单元格的数值至C列,再用查找替换方法,将查找到的C列数值替换成B列数值。
方法:
第一步 提取数值
提取A列数值至C列,C1输入={=LOOKUP(9E+307,--MID(A1,MIN(FIND({0;1;2;3;4;5;6;7;8;9},A1&1234567890)),ROW(INDIRECT("1:"&LEN(A1)))))}
用组合键Ctrl+Shift+Enter确认。C1单元格往下拉至全部A列有数值单元格止。
第二步 VBA查找替换。执行下面的宏
Sub a()
Dim i As Integer
For i = 1 To 100 '假设有100行数据
Cells.Replace What:=Cells(i, 3).Value, Replacement:=Cells(i, 2).Value, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next
End Sub
原理:先提取A列单元格的数值至C列,再用查找替换方法,将查找到的C列数值替换成B列数值。
方法:
第一步 提取数值
提取A列数值至C列,C1输入={=LOOKUP(9E+307,--MID(A1,MIN(FIND({0;1;2;3;4;5;6;7;8;9},A1&1234567890)),ROW(INDIRECT("1:"&LEN(A1)))))}
用组合键Ctrl+Shift+Enter确认。C1单元格往下拉至全部A列有数值单元格止。
第二步 VBA查找替换。执行下面的宏
Sub a()
Dim i As Integer
For i = 1 To 100 '假设有100行数据
Cells.Replace What:=Cells(i, 3).Value, Replacement:=Cells(i, 2).Value, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next
End Sub
展开全部
假设你的原数据在A1单元格,内容为123我(既有数值也有文本),现在要把123替换成B1中的345那么在另一个单元格中输入公式=LEFT(B1,3)&RIGHT(A1,1) 公式意思是说B1单元格的三个数字与A1单元格中的右边第一个组合。。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
C1=SUBSTITUTE(A1,MID(A1,MATCH(1,1*ISNUMBER(-MID(A1,ROW($1:$99),1)),),SUM(1*ISNUMBER(-MID(A1,ROW($1:$99),1)))),B1)
公式以CTRL+SHIFT+ENTER三键结束。
将公式向下复制。
C列即为你要的结果。
公式以CTRL+SHIFT+ENTER三键结束。
将公式向下复制。
C列即为你要的结果。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
若A列各单元格文本数字的长度、位置固定,公式就很简单了。设a1为abc123,b1为456,c1=left(a1,3)&b1
若无规律,则较复杂,即需提取a1中的数值,判断数值的位置、长度,也不难实现。
若无规律,则较复杂,即需提取a1中的数值,判断数值的位置、长度,也不难实现。
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
能说具体一点吗
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询