返回列表 上一主題 發帖

如何一次貼一行資料到csv檔?

如何一次貼一行資料到csv檔?

因為想很久都不會 想說請教大家一下

如果我vba裡面有一個資料

       For m = 1 To 1020 Step 1

              reserve1(m, 1) = Worksheets("Month_P_RV").Cells(19 + m, 106)

       Next m

如何一次將reserve1(:,1) 一行資料貼到csv 呢?

我的寫法如下,但會因為資料型態不符  所以無法貼上
          Reservefilename = Range("outputfile")

          Open Reservefilename For Output As #2

                    Write #2, reserve1,               Write #2,

多謝拉~~

Reservefilename = Range("outputfile")
    Open Reservefilename For Output As #2
    For m = 1 To 1020
          Write #2, Worksheets("Month_P_RV").Cells(19 + m, 106)
    Next m
    Close #2

留意有沒有設錯outputfile位置
懂得發問,答案就會在其中

今日の一秒は  明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

        靜思自在 : 為人處世要小心細心,但不要「小心眼」。
返回列表 上一主題