如何提取数据的偶数和奇数请注意不是偶数行列,或者奇数行列,而是一个数据中的偶数和奇数(数据都是由0到9组成),且按照原先数据的先后排列例如a1 b1 c11234567890 13579 24680如上a1为原始数据

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/09 12:46:26
如何提取数据的偶数和奇数请注意不是偶数行列,或者奇数行列,而是一个数据中的偶数和奇数(数据都是由0到9组成),且按照原先数据的先后排列例如a1 b1 c11234567890 13579 24680如上a1为原始数据

如何提取数据的偶数和奇数请注意不是偶数行列,或者奇数行列,而是一个数据中的偶数和奇数(数据都是由0到9组成),且按照原先数据的先后排列例如a1 b1 c11234567890 13579 24680如上a1为原始数据
如何提取数据的偶数和奇数
请注意不是偶数行列,或者奇数行列,而是一个数据中的偶数和奇数(数据都是由0到9组成),且按照原先数据的先后排列
例如
a1 b1 c1
1234567890 13579 24680
如上a1为原始数据,b1为提取的奇数,c2为提取的偶数,且bc中数据的先后满足a中条件
个人看法,因为总共就是个数字,是否可以一一提取,用if,mid函数

如何提取数据的偶数和奇数请注意不是偶数行列,或者奇数行列,而是一个数据中的偶数和奇数(数据都是由0到9组成),且按照原先数据的先后排列例如a1 b1 c11234567890 13579 24680如上a1为原始数据
用自定义函数解决:
Function ji(x As Range)
ji = x.Value
For i = 2 To 8 Step 2
ji = Replace(ji, i, "")
Next
End Function
Function ou(x As Range)
ou = x.Value
For i = 1 To 9 Step 2
ou = Replace(ou, i, "")
Next
End Function