公告： 为响应国家净网行动，部分内容已经删除，感谢读者理解。
话题：怎么把excel中一列文本中括号里的数字弄出来啊回答：=MID(A1,FIND(＂(＂,A1)+1,FIND(＂)＂,A1)-FIND(＂(＂,A1)-1)
参考回答：=MID(A1,MATCH(TRUE,ISNUMBER(1*MID(A1,ROW($1:$11),1)),0),COUNT(1*MID(A1,ROW($1:$11),1)))数组公式
话题：excel中取D列中括号前的数字求和？？如下图,求大神帮助！回答：=SUMPRODUCT(--LEFT(D1:D12,FIND(＂(＂,D1:D12)-1))话题：在一个excel中怎么提取出了一个中括号内的内容回答：提供三种方法：替换法：按Ctrl H 调出替换对话框，在上面输入*，全部替换。再在上面输入*，点全部替换。公式法：以数据在A列为例，那么在B1输入：=MID(A1,FIND(＂＂，A1)+1,FIND(＂＂，A1)-FIND(＂＂，A1)-1)，然后向下
参考回答：展开全部 提供三种方法：替换法：按Ctrl H 调出替换对话框，在上面输入*，全部替换。再在上面输入*，点全部替换。公式法：以数据在A列为例，那么在B1输入：=MID(A1,FIND(＂＂，A1)+1,FIND(＂＂，A1)-FIND(＂＂，A1)-1)，然后向下拖拉。分列法：选中数据所在列，点数据选项卡下的“分列”，在分隔符中输入，然后选中不要的部分，点击“不导入此列”。确定后，再选中该列，点“分列”，在分隔符中输入，然后选中不要的部分，点击“不导入此列”，确定即可。
话题：怎么把excel中一列文本中括号里的数字弄出来啊回答：=MID(A1,FIND(＂(＂,A1)+1,FIND(＂)＂,A1)-FIND(＂(＂,A1)-1)话题：表格中怎么把一列中的数字提取出来回答：那需要知道数据的律才能填写公式。如果只有数字，参考公式：=MID(A1,MIN(IF(LENB(MID(A1,ROW($1:$99),1))=1,ROW($1:$99))),COUNT(--MID(A1,ROW($1:$99),1))+2)可以提取A1中的数字和字母。注意公式必须使用CTRL+SHIFT+ENTER 3键一起按，结束输入。
参考回答：启动excel 2010，本例以 excel 2010为例进行讲解，其他版本的作方法类似，只需要找到对应的菜单及功能键即可如下图的一组数据，我们在需要处理的数据旁设置一列辅助列先来处理数据在单元格左边的，在辅助列中输入如下图所示的函数“=left(a2,2*len(a2)-lenb(a2))”，并应用到所有左边有数据的单元格如下图，通过拖拽的方式进行拖拽应用，下图是实现后的效果图同样再进行数据在单元格右边情况的数据提取，在辅助列输入下图所示的函数“=right(a11,2*len(a11)-lenb(a11))”同样通过拖拽的方式进行拖拽应用，下图是实现后的效果图
话题：如何提取VBA中单元格中的字符串中的某个数字的值回答：如果你的数据在A列，码如下，有问题HI我：
Sub temp1()For i = [a65536].End(xlUp).Row To 1 Step -1s = 0e = 0s = CLng(InStr(1, Cells(i, 1).Value, ＂[＂)) + 1e = CLng(InStr(1, Cells(i, 1).Value, ＂]＂))If s gt; 1 And e gt; s Thenn = CLng(Mid(Cells(i, 1).Value, s, e - s))Rows(i + 1 amp; ＂:＂ amp; i + n).Insert Shift:=xlShiftUpEnd IfNextEnd Sub话题：怎样提取Excel单元格中的数字
回答：举例说明。例如有数据表如图：img src=＂https://pic.wenwen.soso.com/p/20190513/20190513045316-683471019_png_372_151_4912.jpg＂/现要求将A列中的数字提取出来。第一步：点击工具-visual basic。如图：img src=＂https://pic.wenwen.soso.com/p/20190513/20190513045317-1494868617_png_600_291_89497.jpg＂/第二步：入模块，编制自定义函数。码如下图：img src=＂https://pic.wenwen.soso.com/p/20190513/20190513045318-127263905_png_600_279_72440.jpg＂/第三步：在B2输入公式：=tqsz(A2)。结果如图：img src=＂https://pic.wenwen.soso.com/p/20190513/20190513045318-196683778_png_394_151_5452.jpg＂/第四步：将B2公式下拉至B4.结果如图：img src=＂https://pic.wenwen.soso.com/p/20190513/20190513045319-694494218_png_391_151_5932.jpg＂/
参考回答：楼上那个用公式不能完全实现要求，你把字母也给显示出来了！！！ 单纯用公式可能比较困难，需要用vba j:j列的话，我把程序改了一下。至于vba怎么用，vba就是指用excel的宏。具体用法用文字不太好说明阿！你在菜单栏右键鼠标，选宏，也就是visual basic。会出一个工具条，然后点visual basic editor。然后把我的码贴到里面。同时修改我码里面＂sheet1＂成你实际的sheet名。保存，然后
alt + f8.sub listget()columnnum = thisworkbook.sheets(＂sheet1＂).range(＂j:j＂)for i = 1 to ubound(columnnum)aa = getnum(columnnum(i, 1))thisworkbook.sheets(＂sheet1＂).range(＂k＂ i).value = aanextend subfunction getnum(byval str as string) dim n as integer dim strs() as string dim nums() as string n = instr(str, ＂+＂) if n 0 then redim nums(n - 1) as string strs = split(str, ＂+＂) for i = 0 to ubound(strs) - 1 getnum = getnum getbeginstr(strs(i)) getendstr(strs(i + 1)) next end if end function function getbeginstr(byval bstr as string) dim x as integer dim cnt as integer getbeginstr = ＂＂ x = 4 cnt = 0 if len(bstr) x = len(bstr) end if for i = 1 to x a = mid(bstr, abs(i - x) + 1, 1) if isnumeric(a) then cnt = cnt + 1 else exit for end if next if cnt 0 then getbeginstr = right(bstr, cnt) end if end function function getendstr(byval estr as string) dim x as integer dim cnt as integer getendstr = ＂＂ x = 3 cnt = 0 if len(estr) x = len(estr) end if for i = 1 to x a = mid(estr, i, 1) if isnumeric(a) then cnt = cnt + 1 else exit for end if next if cnt 0 then getendstr = left(estr, cnt) end if end function
话题：如何在excel中,从同列的3个单元格里提取,重复两次的数字,分列显回答：在excel中，可以利用IF函数结合Countif函数，实现从同列的3个单元格里提取，重复两次的数字。作系统：win10；软件版本：Office2010方法如下：1.从A-C列中提取重复两次的数字：img src=＂https://pic.wenwen.soso.com/p/20190320/20190320202526-1673222218_jpeg_356_285_14434.jpg＂/2.输入公式如下：公式解释，先利用countif函数，求A列中的数字在A-C列中是否是2个，如果是返回A列数字；如果不是，则继续计算B列数字。img src=＂https://pic.wenwen.soso.com/p/20190320/20190320202527-428282403_jpeg_600_240_26724.jpg＂/3.下拉填充，得到结果如下：img src=＂https://pic.wenwen.soso.com/p/20190320/20190320202528-541121507_jpeg_600_284_30844.jpg＂/
参考回答：首先你前面的汉字得长度一样长，然后选中单元格，在数据里面选分列，然后选固定宽度，拉出一根固定线，然后确定就可以把1列分成两列，如果汉字长度不一样，请用空格隔开一样长度，否则分出来就长短不一了。如图所示，需要断开的一定要保证空开且对齐。img src=＂https://pic.wenwen.soso.com/p/20180601/20180601153138-1048099177_jpeg_512_340_34740.jpg＂/对齐完成后分列正确结果如下：img src=＂https://pic.wenwen.soso.com/p/20180601/20180601153139-610602888_jpeg_388_148_12474.jpg＂/话题：oracle怎么截取“[289]+[362]”中括号里面的数字回答：如楼上所说，10g以后的版本可以用regexp_substr函数如果oracle版本较低，9i及以下版本可使用translate函数如你上边那个select translate('[289]+[362]-[323243]ppp[454353]','0123456789'||'[289]+[362]-[323243]ppp[454353]', '0123456789') from dual; 具体语法select translate(字段名，字段名||'0123456789','0123456789') from table where 条件
参考回答：写个自定义函数处理吧。。。。额 还有就是用正则表达式了。。。
话题：怎么筛选出电表格中括号里面的数据。量很大括号里面的数据回答：假如A1是有括号的数据，B1用公式提取=MID(A1,FIND(＂(＂,A1)+1,FIND(＂)＂,A1)-FIND(＂(＂,A1)-1)
参考回答：数据量大就用VBA来处理吧运行以下宏就把你sheet1表A列的括号内的内容提取到B列中了
Sub aa()Dim R, x, i, i1Dim arr, arr1With Sheets(＂sheet1＂)R = .Range(＂A65536＂).End(xlUp).Rowarr = .Range(＂A1:A＂ R).ValueReDim arr1(1 To UBound(arr))For x = 1 To UBound(arr)i = InStr(arr(x, 1), ＂(＂) + 1i1 = InStr(arr(x, 1), ＂)＂) - iarr1(x) = Mid(arr(x, 1), i, i1)Next x.Range(＂B1＂).Resize(UBound(arr1), 1) = Application.Transpose(arr1)End WithEnd Sub
