VBA on Range

[Andrew.Trevayne]

Hi all,
The below codes is running the Sub Qry_Run.
It basically, reads B10 value and output the results to D10

Please Login or Register  to view this content.

This is working fine, however, I have many lines, sometimes up to B5000
How do I modify the code so that it will read the values to the last row of column B and output the results to D10 all the way down?

Appreciate any help.
Thank you.

[Keebellah]

I am assuming you use Excel because you mention Range.
What is Qry_Run?
I suggest yolu re-read your own question and thisk: "Would somebody reading this understand what I am asking?"
I don't !

[Andrew.Trevayne]

Qry_Run is another Sub.
It basically, reads B10 value and output the results to D10

[Keebellah]

If that's all it does ... why a sub you could do this with a simple formula unless the sub does moet than that

in D10:

Please Login or Register  to view this content.

Just copy the formula all the way down.

[Andrew.Trevayne]

Thanks but I am not looking for a formula but rather to tweak a working macro.
If you are interested what it does, here's the rest of the codes.

Please Login or Register  to view this content.

It's a macro that queries the Active Directory.
I need the query to run on all rows in column B not just a single cell.

[Keebellah]

Well this is better than guessing what your Qry_Run did

Make sure that B10:B200 is the range you want and the loop will process all rows

Please Login or Register  to view this content.

[Andrew.Trevayne]

Thank you.
I'm getting a "Method Range of Object" error on line --> Qry_Run c.value, range(c.offset(0,1))
Any ideas?

[Keebellah]

The value that is passed from c seems to be invalid, you'll have to check and see what the content of c.value is

In the Qry_Run the forst parameter should be a string (according to your code0, so if that is incorrect then it's going through the vba code step-by-step (pressing F8) to start it