Excel VBA自定义函数MYSTR()指定连接符连接文本

   2020-11-20 IP属地 浙江1960
核心提示:本文小奇老师为大家分享了Excel VBA自定义函数MYSTR()来连接文本演示案例。
内容提要:本文小奇老师为大家分享了Excel VBA自定义函数MYSTR()来连接文本演示案例。

字符串处理一直是Excel函数的软肋,动不动就需要多层嵌套,数组公式,有些功能还无法实现,比如用连接符连接文本,用函数几乎是无法做到的,有了VBA自定义函数,这一切将SOEASY!

下面就为大家分享一个简单的字符串连接处理函数:

函数名:MYSTR 函数作用:用任意连接符连接文本 参数介绍:第一参数:(必须)指定连接符,可以是文本常量,也可以是单元格引用。忽略空单元格。 第二参数:(必须)需要连接的文本或单元格区域。第三、四等参数:(可选)同第二参数 效果展示: excelvba字符串连接  字符串连接自定义函数代码如下: PublicFunctionmystr(ll,ParamArrayx())  ForEachrInx    IfIsArray(r)Then      ForEachrrInr        Ifrr<>""Thenmystr=mystr&ll&rr      Next    Else      mystr=mystr&ll&r    EndIf  Next  mystr=Mid$(mystr,2,Len(mystr))EndFunction 附:自定义函数使用方法: 新建一个EXCEL文档,删除文件中的多余工作表,保留一个,然后ALT+F11,打开VBE编辑器,新建一个模块,把自定义函数代码复制到模块中。 excelvba自定义函数  文件另存,文件保存类型选择倒数第7个“加载宏”。它将自动存入ADDIN文件夹。 Excel加载宏  然后从任意一个EXCEL文件的:工具-加载宏中勾选所保存的宏文件名。确定即可。 更多的excel教程,请关注excel教程微信公众号:Excel公众号
 
反对 0举报收藏 0打赏 0评论 0
更多>相关评论
暂时没有评论,来说点什么吧
更多>同类办公
推荐图文
推荐办公
点击排行