VBA將一個巨大的集合導出到.csv文件中

Question

我對VBA非常新，我無法找到一個函數將我在模擬期間創建的巨大集合導出爲.csv文件。

我發現了一個解決方案，建議將集合轉換爲數組，然後寫入excel工作簿。我成功地打開了一個wb，將其轉換爲數組然後寫入。然而這需要很長時間才能收藏。

我在期待類似於R： write.csv（）。

Answer 1

這是一個很簡單的例子：

Sub qwerty() 
    Dim c As Collection 
    Set c = New Collection 

    c.Add "Larry,Moe,Curly" 
    c.Add "Columbia,Magenta" 
    c.Add "Winken,Blink,Nod" 

    Close #1 
    Open "C:\TestFolder\TestFile.csv" For Output As #1 
    For i = 1 To c.Count 
     Print #1, c.Item(i) 
    Next i 
    Close #1 
End Sub