ｱｸｾｽ初心者です｡ｸｴﾘに関してです｡あるﾃｰﾌﾞﾙの､あるｶﾗﾑにある､｢:｣で区切られた文字列を :で分けるｸｴﾘを組んでいます｡【ｸｴﾘ】 SELECT MySplit(t…

人力検索はてな

ﾓﾊﾞｲﾙ版を表示しています｡PC版はこちら

ｱｸｾｽ初心者です｡ｸｴﾘに関してです｡

あるﾃｰﾌﾞﾙの､あるｶﾗﾑにある､｢:｣で区切られた文字列を
:で分けるｸｴﾘを組んでいます｡

【ｸｴﾘ】
SELECT MySplit(tablevalue,":",0) AS 式1, MySplit(tablevalue,":",1) AS 式2, MySplit(tablevalue,":",2) AS 式3, MySplit(tablevalue,":",3) AS 式4
FROM Shouhin;

【Module1】
Function MySplit(t As String, s As String, i As Integer) As String
Dim sArray() As String
sArray = Split(t, s)
If i <= UBound(sArray) Then
MySplit = sArray(i)
Else
MySplit = ""
End If
End Function

このｸｴﾘは成功しておりますが､実はこのｸｴﾘの結果に､ﾃｰﾌﾞﾙの中の
他のｶﾗﾑの文字列を､そのまま表示させたく､ﾃﾞｻﾞｲﾝﾋﾞｭｰで
普通に追加すると､『集計関数の一部として指定された式'?'を含んでいないｸｴ
ﾘを実行しようとしました』となってしまい､ｴﾗｰとなってしまいます｡
なぜでしょうか？
また､解決策をお教えください｡

よろしく､お願いいたします｡

●質問者: martytaka
●ｶﾃｺﾞﾘ:ｺﾝﾋﾟｭｰﾀ学習･教育
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

▽1 ● kodairabase
●0ﾎﾟｲﾝﾄ

ｸｴﾘ式にはｸｴﾘで追加してください｡
ﾃﾞｻﾞｲﾝﾋﾞｭｰで追加するとおかしなことになります｡

▽2 ● うぃんど
●100ﾎﾟｲﾝﾄ

ﾍﾞｽﾄｱﾝｻｰ

ｸｴﾘﾋﾞｭｰに切り替えると､Accessが余計なおせっかいで､
また勝手にいらない文字を追加してしまったりするので､
引き続きSQLﾋﾞｭｰで書いてください

以下､横に長くなるので適当に改行してます
保存するとAccessがおせっかいにも横一列にしてしまいますが､
それは気にする必要ないです

さて､もっとも手抜きな例(分割前のtablevalueまで出力されちゃいます)

SELECT *
 , MySplit(tablevalue,":",0) AS 式1
 , MySplit(tablevalue,":",1) AS 式2
 , MySplit(tablevalue,":",2) AS 式3
 , MySplit(tablevalue,":",3) AS 式4
FROM Shouhin;

必要な列を指定する例(必要なｶﾗﾑの名前を適当にいれてやれば良いです)

SELECT ｶﾗﾑ名1
 , ｶﾗﾑ名2
 , MySplit(tablevalue,":",0) AS 式1
 , MySplit(tablevalue,":",1) AS 式2
 , MySplit(tablevalue,":",2) AS 式3
 , MySplit(tablevalue,":",3) AS 式4
 , ｶﾗﾑ名3
 , ｶﾗﾑ名4
FROM Shouhin;

martytakaさんのｺﾒﾝﾄ
すげえ！！！ありがとうございました！！本当に感謝です！