excel表格中一个表格内的数字怎么拆分

有朋友问,Excel工作表的A1单元格和B1单元格有两个数字,这两个数字有些是相同的。现在我们需要找出相同的数字并将其写入C1单元格,找出A1单元格中的数字但不在B1单元格中并将其写入D1单元格,找出B1单元格中的数字但不在A1单元格中并将其写入E1单元格。

如下面的工作表图片:

excel表格中一个表格内的数字怎么拆分

我不知道给出的数字是否都是按这样的规律,即第一个原始数据的后面几位数与第二个原始数据的前面几位数相同。如果是这个规律的话,则可以就这个具体的例子给出下面的代码来实现:

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函数)。

如果要将其变为通用的,则可将上述代码转化为自定义函数,并用相对量代替代码中的硬编码。

两个单元格中的数字如果不是按上面提到的规律,则可能两个单元格中的数字中间部分相同,而其它部分不同;或者一个单元格中的数字结尾部分和另一个单元格中的数字的中间部分相同;等等。

有兴趣的朋友可以继续研究。

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发送邮件至 86345@qq.com 举报,一经查实,本站将立刻删除。
(0)
上一篇 2022-04-18 15:00:01
下一篇 2022-04-18 15:10:01

猜你喜欢

  • 重庆建材市场有哪些,重庆建材市场哪个最大

    1、大川国际建材城 重庆大川国际建材城位于沙坪坝,项目占地面积约3000亩,总建筑面积约为300万平方米,总投资近78亿元,囊括石材、陶瓷、瓷砖、卫浴洁具、水暖管道、家用电器、全屋…

    2023-11-27
  • 这几种冬季滋补的养生美容靓汤

    季天气寒冷,气候干燥,喝碗热腾腾的汤应该最舒服不过,而且冬季多喝汤可以补充水分、滋阴润肺。那么你知道煲汤食谱有哪些吗?今天为大家带来7道煲汤食谱大全,赶紧来看看吧! 茶树菇排骨汤 …

    2024-08-11
  • 酷狗总自己关闭(电脑酷狗怎么定时关闭)

    1.首先启动酷狗,点击酷狗软件左上角的酷狗图标弹出主菜单,在主菜单中点击“选项设置”;例如(图1) 图1 2、在弹出的选项设置界面下点击常规设置,把“自动关机”前的选择框打勾,然后…

    2022-05-06
  • access数据库excel文件数据导入到表中

    如何在Excel2013中将Access数据库数据导入工作表 1、启动Excel 2013,打开需要导入Access数据库数据的工作表,在“数据”选项卡的“获取外部数据”组中单击“…

    2022-04-02
  • 电源线导致电脑死机(电脑插上网线死机)

    故障:前两天朋友给自己喜欢的电脑“同曦E1400”重装Windows XP操作系统时遇到以下问题:断开硬盘电源线,只保持数据线连接,POST运行到“按Tab显示POST画面,Del…

    投稿 2022-05-03
  • 什么是雷阵雨_什么叫雷阵雨

    湖南多地强降雨、并伴有雷暴等强对流天气…… 小伙伴们看天气预报时,是不是对这些专业气象名词似懂非懂? 没关系,我们一起来简单了解了解。 【强对流天气】 是指伴随雷暴现象的对流性大风…

    2022-11-03
  • excel2010窗口冻结(2003版excel冻结窗口在哪里)

    小编推荐: Excel 2010怎样冻结窗口 Excel2007冻结窗口,表格中固定窗口 EXCEL怎么冻结窗口 如上图所示一张没有冻结的表单,对于这种表单可以使用横冻结和列冻结,…

    2022-04-12
  • 立春属于哪一种情况_关于立春的民谚

    “一二三四五六七,万木生芽是今日。”北京时间2月4日10时42分将迎来二十四节气中的立春。此时节,大地逐渐苏醒,万物开始复苏,“间泮游鱼跃,和风待柳芳”。 关于立春,民谚有“春打五…

    2023-05-14
  • 柚子皮糖怎么做_柚子皮糖的做法

    柚子皮是个宝,教你这样做,小孩子最爱吃,止咳化痰,秋季吃正好 9月份,很多果实都成熟了,大大的柚子最吸引人的目光了。买一个大柚子,一家人正好够吃,柚子酸甜多汁,可以解渴,是秋季最受…

    2023-01-22
  • 抖音新手期时间要多久_抖音新手期应该做什么

    眼下大火的短视频平台抖音,是有一个新手期的,新手期的一些操作会影响到账号后期流量,很多新手朋友又不是很了解抖音平台的规则,下面我就给大家讲讲关于这方面的内容。 一、抖音新手期时间要…

    2023-04-28

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注