cut & paste cells to new destination not working right

[Veroshima]

Forgive me if this code looks wonky. I pieced it together knowing very little about coding. What I want it to do is cut all cells with a value greater than 300 from cell range "B2:B71", and then paste those cells into column "I". It pastes them over, but is failing to paste the first cell that meets the value requirement. I think this may be because I have a header in I1. Help?

Please Login or Register  to view this content.

TIA

[oeldere]

3. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the [#] button at the top of the post window (if you are editing an existing post, press Go Advanced to see the [#] button). The result will appear like this in the post window:

Please Login or Register  to view this content.

... and appear like this when posted:




your code here ...
and here ...
and here
You can also type the code tags in manually if you prefer. For more information about these and other tags, click here.

[Veroshima]

Oh, thank you! I will do that.

[mehmetcik]

Should I not start from 2?

[Veroshima]

Yes, to start on 2 would be ideal. I don't want to use a specific range, though, like "I2:I40". Just "I2: (however many cells it takes)" Is this possible?

[mehmetcik]

Please Login or Register  to view this content.

[Veroshima]

I am getting a "next without for" error on this.

[Veroshima]

Although I did not get your sub test to work, looking at your code helped me to see what I was doing wrong. Thank you so much for your time!