从逗号分隔的字符串中提取字符串的 SQL 查询

Question

我想使用 VBA 从 MS Access 数据库中提取数据到 MS Excel。

我知道要提取的代码，但在操作列时遇到问题。

我想提取第一个逗号之前的字符串，然后提取第二个和第三个逗号之前的字符串，然后提取第三个逗号之后的字符串。

举个例子。假设我有一个名为 fruits 的列，它的数据为

Banana,Apple,Orange,Grapes

我想创建四列，第一列是香蕉，第二列是苹果，第三列是橙色，第四列是葡萄。

以下是我为第一列尝试的内容。

SQL = "SELECT SUBSTRING(Fruits,0,CHARINDEX(',',Fruits) as column1 from tablename"

Answer 1

你可以创建一个小辅助函数并使用Split：

Public Function GetField( _
    ByVal AllFields As String, _
    ByVal Index As Integer) _
    As String
    
    GetField = Split(AllFields, ",")(Index)
    
End Function

然后：

SQL = "Select GetField([Fruit], 0) As Fruit From YourTable"

Answer 2

试试这个：

DECLARE @Data NVARCHAR(MAX) = 'Banana,Apple,Orange,Grapes'

DECLARE @DataXML XML = '<a>' + REPLACE('Banana,Apple,Orange,Grapes', ',', '</a><a>') + '</a>'

SELECT *
FROM
(
    SELECT T.c.value('.','varchar(255)')
          ,ROW_NUMBER() OVER (ORDER BY T.c)
    FROM @DataXML.nodes('/a') T(c)
) DS ([value], [col])
PIVOT
(
    MAX([value]) FOR [col] IN ([1], [2], [3], [4])
) PVT

---

SELECT 'Banana,Apple,Orange,Grapes'
 AS [my_column]
INTO [my_table]


WITH DataSource (DataXML) AS
(
    SELECT CAST('<a>' + REPLACE([my_column], ',', '</a><a>') + '</a>' AS XML)
    FROM [my_table] 
)

SELECT *
FROM
(
    SELECT T.c.value('.','varchar(255)')
          ,ROW_NUMBER() OVER (ORDER BY T.c)
    FROM DataSource
    CROSS APPLY [DataXML].nodes('/a') T(c)
) DS ([value], [col])
PIVOT
(
    MAX([value]) FOR [col] IN ([1], [2], [3], [4])
) PVT