Hi Mousetrap,

I have a "comma separated values" file and I need to read it and load it
into an array using VBA.


This code reads a file line-by-line. You can then separate out the
individual entries using the split function.

Sub test()
Dim sFile As String
Dim sArray() As String
Dim lCount As Long
sFile = "c:\data\book1.csv"
ReDim sArray(1)
Open sFile For Input As #1
Do
lCount = lCount + 1
ReDim Preserve sArray(lCount)
Line Input #1, sArray(lCount)
'place code here to split the read line into individual elements
Loop Until EOF(1)
Close #1
End Sub


Regards,

Jan Karel Pieterse
Excel MVP
www.jkp-ads.com