Excel VBA自定義函數MYSTR()指定連接符連接文本

Excel VBA自定義函數MYSTR()指定連接符連接文本

字符串處理一直是Excel函數的軟肋，動不動就需要多層嵌套，數組公式，有些功能還無法實現，比如用連接符連接文本，用函數幾乎是無法做到的，有了VBA自定義函數，這一切將SO EASY！

下面就為大家分享一個簡單的字符串連接處理函數：

函數名：MYSTR　　函數作用：用任意連接符連接文本　　參數介紹：　　第一參數：（必須）指定連接符，可以是文本常量，也可以是單元格引用。忽略空單元格。　　第二參數：（必須）需要連接的文本或單元格區域。　　第三、四等參數：（可選）同第二參數　　效果展示：　　字符串連接自定義函數代碼如下：Public Function mystr(ll, ParamArray x()) For Each r In x If IsArray(r) Then For Each rr In r If rr <> "" Then mystr = mystr & ll & rr Next Else mystr = mystr & ll & r End If Next mystr = Mid$(mystr, 2, Len(mystr))End Function　　附：自定義函數使用方法：　　新建一個EXCEL文檔，刪除文件中的多余工作表，保留一個，然后ALT+F11，打開VBE編輯器，新建一個模塊，把自定義函數代碼復制到模塊中。　　文件另存，文件保存類型選擇倒數第7個“加載宏”。它將自動存入ADDIN文件夾。　　然后從任意一個EXCEL文件的：工具-加載宏中勾選所保存的宏文件名。確定即可。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。