Pasting with VBA

[Rogozhin]

Hi,

I'm stumped on a couple of issues and would be grateful if anyone can offer a tip on either (or both!).

I have some code which checks the values in column M of a sheet ("Timesheets Update") and if less than or equal to a specified value copies it across to another sheet ("Renewals").

The problem is that it copies across the cell formula rather than actual cell value. I think I need to use pastespecial but can't get it to work properly.

The second issue I have is that when it copies across it retains any blank rows (e.g. if only rows 5, 10 and 15 have values matching the specified criteria I end up with multiple blank rows between my results). Is there a way of avoiding this?

Please Login or Register  to view this content.

Thanks for any help.

[StephenR]

See if this works.

Please Login or Register  to view this content.

[romperstomper]

FYI, your problem was that you were incrementing the value of d outside your if..end if clause, so it increased even if you didn't copy a row. You also don't need that Chr(64+j):

Please Login or Register  to view this content.

[Rogozhin]

Many thanks to StephenR and Romperstomper for the help - works perfectly! Thanks.