投稿日 | : 2003/02/18(Tue) 09:56 |
投稿者 | : nanashi |
Eメール | : |
URL | : |
タイトル | : Re: カンマ区切りの文字列取得について |
> "a","a,b,c,","bb""b","d,""d"というCSVデータを読み込んで
> それぞれを変数に格納したいのですが、ただカンマで区切るだけだと
> 区切ってはいけないとこで区切られたりしてしまいます。
正確にやると結構面倒くさいので簡単にやってみます。
Dim strBuff as String
Dim varBuff As Variant
strBuff = """a"",""a,b,c,"",""bb""""b"","",d""""d"""
strBuff = Replace$(strBuff, """,""", """" & vbCrLf & """")
varBuff = Split(strBuff, vbCrLf)
○結果
varBuff(0) = "a"
varBuff(1) = "a,b,c,"
varBuff(2) = "bb""b"
varBuff(3) = "d,""d"
この形式のCSV限定ですけど、一応こういう風にも出来ます。