使用自定義函數快速連線Excel表格中多單元格資料的方法

2020-07-14 14:34:17

字串處理是函數的軟肋，動不動就多層巢狀，陣列公式，有些功能還無法實現，比如用連線符連線文字，用Excel函數幾乎是無法做到的，有了VBA自定義函數，這一切將SO EASY!

下面就介紹一個簡單的字串處理常式：

函數名：MYSTR

作用：用任意連線符連線文字

引數介紹：第一引數：(必須)指定連線符，可以是文字常數，也可以是單元格參照。忽略空單元格。

第二引數：(必須)需要連線的文字或單元格區域。

第三、四等引數：(可選)同第二引數

效果展示：

建立自定義函數的方法：

新建一個EXCEL文件，只保留一個工作表，其餘刪除。

按ALT+F11，開啟VBE編輯器，新建一個模組，把下面的自定義函數程式碼複製到模組中，關閉VBE編輯器。

PublicFunction 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

Else

mystr = mystr & ll & r

End If

mystr = Mid$(mystr, 2, Len(mystr))

EndFunction

按F12【另存為】，檔案儲存型別選擇“Excel載入宏”。它將自動存入ADDIN資料夾中。

然後從任意一個EXCEL檔案的【開發工具】-【載入宏】中勾選所儲存的宏檔名，確定。就可以在工作表中的隨心所欲的使用自定義的合併文字函數啦，趕緊的，動手試試吧——