CSVファイルを既存のExcelファイルに追加するには？ (ID:75715)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Excelにデータを送るはやったこと無いのでわからないのですが、 単純にTABごとに分割するのだったらSplit関数で出来ますよ。 Dim intIndex As Integer Dim intFileNo As Integer Dim strText As String Dim strArray() As String intFileNo = FreeFile Open "C:\a.txt" For Input Access Read As intFileNo Do Until EOF(intFileNo) Line Input #intFileNo, strText strArray = Split(strText, vbTab) For intIndex = 0 To UBound(strArray) MsgBox strArray(intIndex) Next intIndex Loop Close intFileNo 読み込んだデータをTABごとに分割して 分割された内容をMsgboxで表示しているだけですが。 もし すっとんきょん事書いてたら、ごめんなさい。