I need to extend my range from my limited arrays.

Hi Experts,

I have a working code having its limitations. I have a range "A" column [{9;11;13;15;17;19;21;23;25;27}]). However, I wanted to extend this range until there are available values on the cell selected. If the value has extended until 100, I do not want to input it manually, I am seeking your expertise to have a range or steps that can range to 9-until value available, and 10-until value available for the "C" Column.

Let me know if you need other information. I am not an expert as I was able to develop this code with the help of our friends here. Thank you.

Please Login or Register  to view this content.

Try this...

Please Login or Register  to view this content.

Please Login or Register  to view this content.

Hi Jindon, thank you for your help. I have seen that you are an expert; you also simplify my code as some of it is new to me. I have an additional request, is it possible to revise below code? I want to paste this code instead of range("D16"), I want it to be dynamic, for example, this first part of code end to column A row 45. I want to start copying it to row 47 column D (1-row offset).

Sheets("psgc").Range("D16").Resize(rng.Columns.Count) = Application.Transpose(rng)

Possibly with...

Please Login or Register  to view this content.

Thank you jindon for the help. Adding reputation on you.

Thank you dangelor for the help. Adding reputation now.

You're welcome and thank you!