標題: 如何一次貼一行資料到csv檔? [打印本頁]

---

作者: blueteddy    時間: 2011-10-13 18:52     標題: 如何一次貼一行資料到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,

多謝拉~~

---

作者: kimbal    時間: 2011-10-13 23:22

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://forum.twbts.com/)