Array Error

[AnilPullagura]

Pros,

I am trying to assign an array to a Range of cells using End(xlToRight) property. I am still learning Arrays and would need help on the below code.

ColHeads = Array(Worksheets(wkshtnames(m)).Range("A1" & Range("A1").End(xlToRight).Address))

Macro is throwing an Error on this Line: Application-Defined or Object-Defined Error

Help Required.

Thanks,
Anil

 

[SydneyGeek]

Try:

ColHeads = Array(Worksheets(wkshtnames(m)).Range(Range("A1"),Range("A1").End(xlToRight)))

Denis

 

[GlennUK]

How about:

With Worksheets(wkshtnames(m))
ColHeads = .Range(.Range("A1"),.Range("A1").End(xlToRight)).Value
End With

?

It gives a 2 dimensional array, ColHeads(1,n), where n is number of columns.

 

[AnilPullagura]

Thanks Sydney and Glenn for your time.

However, Both did not work

I asked this question because i was doing a project and stuck on this line...

Please check the below thread if you can help me out in any form. Thanks in advance.

http://www.mrexcel.com/forum/showthread.php?t=568520

Regards,
Anil

 

[GlennUK]

...
However, Both did not work
...

In what way did it not work? It is that you got an error message? Or what? You must give a reasonable amount of information, or else, how are people supposed to help!

 

[SydneyGeek]

Could you give some more detail on what you want? And, as Glenn said, which bit 'didn't work'?

We can only help if we know what is needed, or else we are flying blind.

Denis

 

[AnilPullagura]

Sorry Glenn and Sydney for not being clear on my requirements.

The problem i have is posted on this thread. Please spare your time to have a look and help me out.

http://www.mrexcel.com/forum/showthread.php?t=568520