当Excel函数计算中,单元格内有文字应该如何处理数据,急~~~
答案:2 悬赏:50 手机版
解决时间 2021-01-31 18:32
- 提问者网友:辞取
- 2021-01-30 19:07
在执行函数命令时要如何处理才能得出数值
最佳答案
- 五星知识达人网友:煞尾
- 2021-01-30 19:20
你的数值是间隔插在文这中,还是一段文字,一段数字?
******************
按下ALT+F11,插入-模块,将下列代码复制入代码框.退出
然后选中你这列数据.然后运行宏.数字会在边上一列出现的.
Sub AAAA()
Dim A As String
Dim B As String
Dim C As Integer
For Each Y In Selection
C = Len(Y)
For X = 1 To C
If Asc(Mid(Y, X, 1)) >= 48 And Asc(Mid(Y, X, 1)) <= 57 Then
B = Mid(Y, X, 1)
A = A & B
End If
Next
ActiveCell.Offset(0, 1).Value = A
ActiveCell.Offset(1, 0).Select
A = ""
Next
End Sub
******************
按下ALT+F11,插入-模块,将下列代码复制入代码框.退出
然后选中你这列数据.然后运行宏.数字会在边上一列出现的.
Sub AAAA()
Dim A As String
Dim B As String
Dim C As Integer
For Each Y In Selection
C = Len(Y)
For X = 1 To C
If Asc(Mid(Y, X, 1)) >= 48 And Asc(Mid(Y, X, 1)) <= 57 Then
B = Mid(Y, X, 1)
A = A & B
End If
Next
ActiveCell.Offset(0, 1).Value = A
ActiveCell.Offset(1, 0).Select
A = ""
Next
End Sub
全部回答
- 1楼网友:笑迎怀羞
- 2021-01-30 20:52
在a5输入 =if(a1="","",a1),回车。一样,在a8,a10,b13也输入 =if(a1="","",a1)
功能实现。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯