怎样使用VBA分离数字
1、首先在开发工具中打开VBA编辑器
2、在单元格区域当中输入一些内容作为例子
3、在VBA编辑器中插入模块
4、在模块当中输入如下代码,然后运行Function Numbers(Rng As Range) '提取数字 Dim n As Integer For n=1 To Len(Rng) '对单元格字符逐个检查 If IsNumeric(Mid(Rng, n, 1)) Or Mid(Rng, n, 1)="." Then'如果是数字 Numbers=Numbers & Mid(Rng, n, 1) '提取出连接成字符串 End If Next nEnd Function
5、在单元格C2中输入公式“=Numbers(A2)*Numbers(B2)”,然后下拉至C6,公式结果如图所示
声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
阅读量:25
阅读量:80
阅读量:60
阅读量:52
阅读量:46