Do Loop error - first week with VBA

Good morning everyone. I've only recently started getting into VBA in excel. I've taken a few VBA for Excel classes online so I understand the very basics. I have written a few codes with the help of a few google searches but this one has me stumped.

I have a list of customers with time windows for when product can be delivered. For some reason, time windows read 0 rather than actual times for several customers. I'd like vba to check a cell, if it is 0, I'd like it to copy all the time windows in the row above and paste into the time windows that read 0 (the row below).

The error I get is "Loop without Do"

Here is what I have so far.

Please Login or Register  to view this content.

If someone knows what is going on and could explain the reasoning I would greatly appreciate it. I really want to learn this coding as it will make my life much much easier.

Thanks!

Jon

You need code tags to comply with the forum rules ... which you should read.

To save you a little time, it's probably more to do with the If ... Else ... Else ... and no End If. Not sure about the validity of two Else's but the proof is in the eating.

Try this,

Please Login or Register  to view this content.

You have an alternative solution.

However, if you want to use Do, it usually takes the format Do Until or Do While. You have also commented out the break out Exit Do.


Regards, TMS

whoops, sorry Tm, I did not see you had posted.

I don't follow. Are you saying you have the letter "o"?

I suggest that you upload a sample workbook. We seem to be clutching at straws tying to understand your requirements.

Regards, TMS

Hi Jobell,

I altered your code:

Please Login or Register  to view this content.

Click on Go Advanced. Click on the Paperclip icon or Manage Attachments. Navigate to your file ... follow the instructions.

Regards, TMS

Originally Posted by xladept

Hi Jobell,

I altered your code:

Please Login or Register  to view this content.

Works great! Thanks!

I have a question about how this works if you dont mind!

Please Login or Register  to view this content.

The ActiveCell at the end of that line - when I commented that out of the code it no longer pasted the copied cells to the cells below with 0s. When I removed the comment ' and ran it again, it pasted. How does that work? I just don't understand the logic behind it and would love if you could explain it!

Thanks!

Hi jobell,

The ActiveCell at the end of the line is the copy destination - check out the help file for the copy method and all should become clear.