Excel单元格数据特殊处理实例
有朋友要求Excel工作表的A1单元格和B1单元格中有两个数字，这两个数字有一部分相同，现在要找出其中相同的数字并写入单元格C1，找出A1中有而B1中没有的数字并写入单元格D1，找出B1中有而A1中没有的数字并写入单元格E1。
如下面的工作表图片：
我不知道给出的数字是否都是按这样的规律，即第一个原始数据的后面几位数与第二个原始数据的前面几位数相同。如果是这个规律的话，则可以就这个具体的例子给出下面的代码来实现：
Sub SeparateNumber()
Dim strFirst As String
Dim strResult As String
Dim StartNum As Integer
Dim EndNum As String
Dim i As Integer, j As Integer
strFirst = Left(Range(”B1″), 1)
StartNum = InStr(1, Range(”A1″), strFirst)
j = 1
For i = StartNum To Len(Range(”A1″))
EndNum = Mid(Range(”A1″), i, 1)
If EndNum = Left(Range(”B1″), j) Then
j = j + 1
End If
Next i
If j > 1 Then
strResult = Mid(Range(”A1″), StartNum, i - 1)
End If
‘单元格C1中的数据
Range(”C1″).Value = strResult
‘单元格D1中的数据
Range(”D1″).Value = Left(Range(”A1″), StartNum - 1)
‘单元格E1中的数据
Range(”E1″).Value = Right(Range(”B1″), Len(Range(”B1″)) - j)
End Sub
代码很简单，只是运用了几个VBA函数。
讨论：
其实代码可以进一步简化，因为VBA还有一个数组函数(Split函数)。 如果要将其变为通用的，则可将上述代码转化为自定义函数，并用相对量代替代码中的硬编码。 两个单元格中的数字如果不是按上面提到的规律，则可能两个单元格中的数字中间部分相同，而其它部分不同;或者一个单元格中的数字结尾部分和另一个单元格中的数字的中间部分相同;等等。
相关推荐
-
怎么将Excel单元格数据进行四舍五入
Excel是现在十分常用的文件类型之一,有些用户想知道怎么将Excel单元格数据进行四舍五入,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步打开电脑中需要编辑的Excel文档,根 ...
-
如何将Excel单元格数据分列
Excel是现在十分常用的办公软件之一,有些新用户不知道如何将Excel单元格数据分列,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步根据下图所示,打开电脑中的Excel文档.2 ...
-
如何将Excel单元格数据复制为图片
Excel是现在十分常用的文件类型之一,有些新用户不知道如何将Excel单元格数据复制为图片,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步根据下图箭头所指,打开电脑中需要编辑的 ...
-
怎么将Excel单元格数据进行随机排序
Excel是现在十分常用的文件类型之一,有些新用户不知道怎么将Excel单元格数据进行随机排序,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步根据下图所示,打开电脑中的Excel ...
-
WPS如何给Excel单元格数据添加下划线
WPS是现在十分常用的办公软件之一,有些新用户不知道如何给Excel单元格数据添加下划线,接下来小编就给大家介绍一下具体的操作步骤.方法一:1. 首先第一步根据下图所示,打开电脑中需要编辑的Excel ...
-
WPS怎么将Excel单元格数据转换为图片
WPS是现在十分常用的一款办公软件,有些新用户不知道怎么将Excel单元格数据转换为图片,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步根据下图所示,用WPS打开电脑中的Exce ...
-
WPS怎么快速对比Excel单元格数据
WPS是现在十分常用的一款办公软件,有些新用户不知道怎么快速对比Excel单元格数据,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步先打开电脑中的Excel文档,接着根据下图箭头 ...
-
怎么通过Excel单元格数据批量创建文件夹
Excel是现在十分常用的文件类型,有些新用户不知道怎么通过Excel单元格数据批量创建文件夹,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步先打开电脑中的[优速文件生成器]软件 ...
-
Excel单元格数据太长
Excel单元格数据太长怎么办呢?今天小编分享下自己的方法,希望能够帮助到有需要的小伙伴. 操作方法 01 打开excel表格,见下图 02 选中数据比较长的表格,右击鼠标,找到"设置单元格 ...
