Do While there are values in column A

[concatch]

Hi,

I'm a beginner to VBA and I'm having some difficulty. I have values in cells A1:A10. What I wants to do it create a while loop to insert a specific value into B1:B10 ie it will stop when there are nolonger values in A column which will occur at A11.

Here is my code so far:

Please Login or Register  to view this content.

Thanks in advance

[Steffen Thomsen]

Hi,

Try this

Please Login or Register  to view this content.

[zbor]

Steffen gave you an answer...
This is jut modification of your code with Do While loop:

Please Login or Register  to view this content.

Edit: as you can see from both answers avoid .Select in your codes.

[aussieboykie]

Another approach..

Please Login or Register  to view this content.

Regards, AB

[concatch]

Thank you all for your assistance. Stephen your code continues to populate even if there is a break in the data ie A8 has a value, A9 does not have a value and A10 has a value.

[Steffen Thomsen]

Yes, you didn't specify in your question how the data would be populated, so i made an assumption.

Then just insert a check on the cell content.

Please Login or Register  to view this content.

Or

If you need the code to continue after the blank cell until the end of column a

Please Login or Register  to view this content.