自定义函数--提取单元格内多个被分开的数字

YZC51 · 发表于 2019-11-4 07:30

本帖最后由 YZC51 于 2019-11-4 08:56 编辑

玉阳山人发表于 2019-11-3 19:23
感谢老师提醒！

请参考附件

玉阳山人 · 发表于 2019-11-4 07:52

YZC51 发表于 2019-11-4 07:30
请参考附件

感谢老师！多个代码比较之下，觉得还是http://club.excelhome.net/forum. ... 87&pid=10134250 的代码最能实现我的初衷！

YZC51 · 发表于 2019-11-4 08:56

玉阳山人发表于 2019-11-4 07:52
感谢老师！多个代码比较之下，觉得还是http://club.excelhome.net/forum.php?mod=redirect&goto=findpost ...

附件已经更新，请重新下载

玉阳山人 · 发表于 2019-11-4 10:51

YZC51 发表于 2019-11-4 07:30
请参考附件

这个代码很合我需！谢谢老师！

玉阳山人 · 发表于 2019-11-5 15:39

YZC51 发表于 2019-11-4 08:56
附件已经更新，请重新下载

补送几朵花花，以感谢老师的倾力帮助之情。

YZC51 · 发表于 2019-11-5 15:42

玉阳山人发表于 2019-11-5 15:39
补送几朵花花，以感谢老师的倾力帮助之情。

不客气！谢谢花花鼓励！

iris00 · 发表于 2019-11-7 10:50

YZC51 发表于 2019-11-1 16:05
如下代码替换Sheet1模块里的代码
Private Sub ToggleButton1_Click()
Dim JGD As Shape

我复制过去，还是同样的提示。奇怪到底哪里出问题了呢？

YZC51 · 发表于 2019-11-7 11:04

iris00 发表于 2019-11-7 10:50
我复制过去，还是同样的提示。奇怪到底哪里出问题了呢？

上传附件，分析下原因

iris00 · 发表于 2019-11-8 11:23

直接复制楼主的一张表是好用的。再复制一张，第二张表的开关就不能正常使用，开关是受第一张表控制。第三张表是复制代码，总出问题提示缺少SUB。

iris00 · 发表于 2019-11-8 11:40

YZC51 发表于 2019-11-7 11:04
上传附件，分析下原因

研究半天终于想起来怎么可以送花了。

		自动登录	找回密码
密码			免费注册

[讨论] 自定义函数--提取单元格内多个被分开的数字