transpose 255+ columns into rows?
 

Dear All, I have the following excel VBA code, which allows the user t
import a data range of over 255 columns. The macro takes the sequenc
and places it into column1 for each row.
As my extract is merely 1000 rows long, I would like to use th
transpose functionality to transpose the data so that I can use th
65000 rows of dat to show each columns data in my import file.

Is this possible, and if so, help with the code would be gratefull
received.

file import vba below:
Sub TxtImp_Tweeker()
Dim ColumnArray(1 To 100, 1 To 2) As Integer
Dim x As Integer

For x = 1 To 100
ColumnArray(x, 1) = x
ColumnArray(x, 2) = 1
Next x

ChDir "D:\Personal Data\swilson5"
Workbooks.OpenText _
Filename:="D:\Persona
Data\swilson5\Inpatients_Test_for Sean.txt", DataType:=xlDelimited, _
FieldInfo:=ColumnArray
End Sub

Thank

--
scottwilson
-----------------------------------------------------------------------
scottwilsonx's Profile: http://www.excelforum.com/member.php...fo&userid=1112
View this thread: http://www.excelforum.com/showthread.php?threadid=27216