Editing a for each next loop

G

Guest

Hi
How do I instead of selecting the range B6:Bb14 below tell excel to loop
starting from b6 and continue down till the cell in col B is empty?

?Sub PasteData()

Dim r As Range

For Each r In Worksheets("Makron").Range("B6:B14")
GetPortfolioData Portfolio:=r.Value
Next

End Sub
 

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

Similar Threads

How to copy only one value from range to worksheet 5
When is a Loop Necessary ? 6
how do I write a loop macro? 9
Using Collection to also capture range adjacent 10
For Next loop 2
shorten sheet name 4
add a date in a row from row above 1
Get multiple cells from all worksheets Code Not Work 1

Top