だいぶ以前に、CSV分割について記載した。
これ、「CSV分割 完全版」。
これとほぼ同じ事を、
VBAの関数で出来た。
Dim sCsvDataBuff As String Dim vBuffArr As Variant Dim iCon As Integer sCsvDataBuff = "データ1,データ2,データ3" 'カンマでスプリット vBuffArr = Split(sCsvDataBuff, ",") For iCon = 0 To UBound(sCsvDataBuff) Debug.Print sCsvDataBuff(iCon) Next iCon
こんなのあったんだな。。。