組合字串加入空白字元區隔 - Excelㄧ般區 - 麻辣家族討論版版

麻辣家族討論版版 » Excelㄧ般區 » 組合字串加入空白字元區隔

返回列表下一主題上一主題發帖

組合字串加入空白字元區隔

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2848
主題: 10
精華: 0
積分: 2903
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2026-7-25

1^# 跳轉到 »

發表於 2013-5-25 17:27 | 顯示全部帖子

利用FUNCTION自訂函數，以分隔符號連接文字串，可能較簡單便利，也較具彈性！

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2848
主題: 10
精華: 0
積分: 2903
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2026-7-25

2^#

發表於 2013-6-5 10:32 | 顯示全部帖子

Function QQString(QBase, QMark$, QBy%) As String
Dim TT$, xR
If Val(QBy) > 0 Then QBase = QBase
For Each xR In QBase
　　If xR <> "" Then TT = TT & QMark & xR
Next
QQString = Mid(TT, 2)
End Function

複製代碼

　
公式：=QQString(A1:E5,"-",0)
　　　=QQString(A1:E5,"-",1)
　
QMark（連接符號）．QBy=0（循列．由左而右＞由上而下）．QBy>0（循欄．由上而下＞由左而右）

靜思自在 : 口說好話、心想好意、身行好事。

返回列表下一主題上一主題