Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 6841|回复: 15

[VBA] 神奇的SPLIT,你不曾用过的第3个参数

[复制链接]
发表于 2013-9-14 22:19 | 显示全部楼层 |阅读模式
本帖最后由 hwc2ycy 于 2013-9-14 22:54 编辑

7.split函数                                                               
        Split(expression[, delimiter[, limit[, compare]]])                                                        
        返回一个下标从零开始的一维数组,它包含指定数目的子字符串。                                                        
                                                               
        语法                                                        
        expression                                        必需的。包含子字符串和分隔符的字符串表达式 。        
                                                        如果expression是一个长度为零的字符串(""),Split则返回一个空数组,即没有元素和数据的数组。        
        delimiter                                                可选的。用于标识子字符串边界的字符串字符。        
                                                        如果忽略,则使用空格字符(" ")作为分隔符。        
                                                        如果delimiter是一个长度为零的字符串,则返回的数组仅包含一个元素,即完整的 expression字符串。        
        limit                                                可选的。要返回的子字符串数,–1表示返回所有的子字符串。        
        compare                                                可选的。数字值,表示判别子字符串时使用的比较方式。        
                                                        具体值可参见Filter的Compare参数解释        
                                                               
        代码七
  1. Dim arr1, arr2, arr3, arr4, arr5, arr6
  2. Dim str1$, str2$, str3$

  3. str1 = "a,Ab,abc,Abcd,abcde,Abcdef,abcdefg,Abcdefgh"
  4. arr1 = Split(str1)
  5. arr2 = Split(str1, ",")
  6. arr3 = Split(str1, ",", 3)
  7. arr4 = Split(str1, "a", , vbTextCompare)
  8. arr5 = Split(str1, "a", , vbBinaryCompare)
  9. Stop

  10. str2 = "a b c d"
  11. arr1 = Split(str2)
  12. arr2 = Split(str2, , 3)
  13. Stop

  14. str3 = "a#b##c###d####"
  15. arr1 = Split(str3, "#")
  16. arr2 = Split(str3, "#", 4)
  17. Stop
复制代码

评分

参与人数 4 +42 收起 理由
lyf7276 + 20 很给力!
一杯清荼 + 3 没有用过第三参数,学习了。
风林火山 + 9 赞一个!
我心飞翔410 + 10

查看全部评分

发表于 2013-9-14 22:26 | 显示全部楼层
回复

使用道具 举报

发表于 2013-9-14 22:29 | 显示全部楼层
回复

使用道具 举报

发表于 2013-9-14 22:39 | 显示全部楼层
学习了,恭喜hwc2ycy荣升版主

点评

好久不见你发贴了。  发表于 2013-9-14 22:58
回复

使用道具 举报

发表于 2013-10-8 19:54 | 显示全部楼层
第3参数没有实用性。
回复

使用道具 举报

发表于 2013-10-10 21:36 | 显示全部楼层
香川老师,求帮助,我实在是搞不定了
http://www.excelpx.com/thread-311036-1-1.html
回复

使用道具 举报

发表于 2013-10-13 11:21 | 显示全部楼层
顶,熟悉一下
回复

使用道具 举报

发表于 2013-10-26 11:11 | 显示全部楼层
回复

使用道具 举报

发表于 2013-12-8 15:47 | 显示全部楼层
学习了
回复

使用道具 举报

发表于 2014-2-17 20:16 | 显示全部楼层
学习

点评

不要灌水,不然要扣分的。  发表于 2014-2-17 21:15
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-3-29 05:08 , Processed in 1.391355 second(s), 13 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表