I'm trying to import a csv file into a 2D array in VBA, for example:

myFile(column_count,row_count), is this possible?

Thanks

On Oct 22, 3:17*pm, Dave wrote:
I'm trying to import a csv file into a 2D array in VBA, for example:

myFile(column_count,row_count), is this possible?

Thanks

One way that comes to mind is to first import the csv file into a
worksheet then use the following code:

Assuming you've imported the sheet into Sheet1:

Sub Create2DArray()

Dim TwoDArray() As Variant

TwoDArray = Sheets(1).UsedRange.Value

End Sub

Dave: As I responded yesterday, you have to open the file and read one line
at a time. then use the split functions to seperate athe data into an array.

"Dave" wrote:

I'm trying to import a csv file into a 2D array in VBA, for example:

myFile(column_count,row_count), is this possible?

Thanks

A good idea, I'm actually trying to avoid importing the data into a tab,
however, because I'm still in Excel 2003 and I'd run into the 65k column and
256 row limits that way...

"signon77" wrote:

On Oct 22, 3:17 pm, Dave wrote:
I'm trying to import a csv file into a 2D array in VBA, for example:

myFile(column_count,row_count), is this possible?

Thanks

One way that comes to mind is to first import the csv file into a
worksheet then use the following code:

Assuming you've imported the sheet into Sheet1:

Sub Create2DArray()

Dim TwoDArray() As Variant

TwoDArray = Sheets(1).UsedRange.Value

End Sub

If your datra is that large, you should import the data into multiple columns
or worksheets.

"Dave" wrote:

A good idea, I'm actually trying to avoid importing the data into a tab,
however, because I'm still in Excel 2003 and I'd run into the 65k column and
256 row limits that way...

"signon77" wrote:

On Oct 22, 3:17 pm, Dave wrote:
I'm trying to import a csv file into a 2D array in VBA, for example:

myFile(column_count,row_count), is this possible?

Thanks

One way that comes to mind is to first import the csv file into a
worksheet then use the following code:

Assuming you've imported the sheet into Sheet1:

Sub Create2DArray()

Dim TwoDArray() As Variant

TwoDArray = Sheets(1).UsedRange.Value

End Sub