Printing a 2 dimensional array

[parasbshah]

Hello,

I am fairly new at VBA Programming for Excel. I would like to print a 2D array (matrix if you will)
to a text file. The 2D array is variant in type as it consists of both string and text. I would like the
array to look as below:

$ CASE COLD NOISE COLD NOISE COLD SCUFF DURABILITY HOTSCUFF
SPEED 1800 2800 4200 6200 6200
BHPE 5000.0 10000.0 36000.0 65900.0 65900.0
FHPE 3000.0 5000.0 20000.0 70000.0 70000.0

I am using the follwing code:

Please Login or Register  to view this content.

However using this code prints in successive lines as below:

$ CASE
COLD NOISE
COLD NOISE
COLD SCUFF
.....
.....
And So on instead of the column format as I want. How do I get VBA to print as shown above in a column format.

Thanks

Paras

[Mordred]

Perhaps switching the order of the arrays from

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

This is not tested at run-time

[parasbshah]

Mordred,

Thanks for the suggestion. Howver that did not work. What it just did was print the first column of the array in successive lines and then started the second column and so on (as shown below)

$ CASE
SPEED
BHPE
FHPE
COLD NOISE
1800
5000
3000
....
....
And so on

[watersev]

hi, parasbshah, it can be done this way

Please Login or Register  to view this content.

[parasbshah]

Hi WaterSev,

Thanks for your suggestion. However in my case the array "x" is variable in size depending on the number of Columns entered by the user. So the statement

For i = 1 To UBound(x): a.WriteLine x(i, 1) & " " & x(i, 2): Next: a.Close

will not work for me since I would not know beforehand how many times to concatenate x(irow,icol). I need a logic which will automatically adjust to the number of columns in the array x.

Do you have any suggestions?

Thanks

Paras

[protonLeah]

Try:

Please Login or Register  to view this content.

Chr(9)=Tab

[watersev]

Please Login or Register  to view this content.

[parasbshah]

Hi ProtonLeah & watersev

I tried the suggestions that you gave me and it worked like a charm.

Thanks a lot Guys !!!!