Transpose simple question

  • Thread starter Thread starter avi
  • Start date Start date
A

avi

Hello,

I have a one dimensional array (one column, many rows). I try to
transpose it so to get one row, many columns but don't succeed

A simple example
Dim myarray As Variant
Dim myarrayT As Variant
myarray = xlApp.ActiveSheet.Range("A1:A10")
myarrayT = xlApp.Transpose(myarray)
MsgBox UBound(myarrayT, 1) returns the number of rows of the
original array (instead of 1)
MsgBox UBound(myarrayT, 2) does'nt work (out of range)

Do I miss something?
Remark: I am working in VB6

Thanks a lot
Avi
 
You original arrray has 10 rows and 1 column
your transpose array as 1 row and 10 columns

the rows is the first item in Ubound and the columns the 2nd item

MsgBox UBound(myarrayT, 1) returns 10 which it correct

MsgBox UBound(myarrayT, 0) will return 1
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top