Solved: Non-Contiguous Copy PasteSpecial

[YellowLabPro]

I am hoping to combine the three ranges into one line of code, rather than three....
Permittable?
[VBA]
.Range("H4:U4" & ",Z4" & ",AC4").Copy
.Range("H6:U" & lrwSource & ",Z6:Z" & lrwSource & ", AC6:A" & lrwSource).PasteSpecial (xlPasteFormats)
[/VBA]

[Bob Phillips]

Don't think so, but why. Where is the problem, you only write it once.

[YellowLabPro]

I was hoping to avoid this, which is six lines of code, rather than two if it were....

[VBA]
.Range("H4:U4").Copy
.Range("H6:U" & lrwSource).PasteSpecial (xlPasteFormats)
.Range("Z4").Copy
.Range("Z6:Z" & lrwSource).PasteSpecial (xlPasteFormats)
.Range("AC4").Copy
.Range("AC6:A" & lrwSource).PasteSpecial (xlPasteFormats)
[/VBA]

[rory]

Assuming you apply the format in the first place, couldn't you apply it to all the rows, then clear row 5?

[Bob Phillips]

But again I ask why? That second block of code is much cleaner, readable and maintainable IMO than the other (even if it DID work).

[YellowLabPro]

Rory,
Simply in this case no.

Bob- ok... no worries. As I move onward- I am looking for better ways to code. If in your opinion that this is the sound approach then I am good.

thanks

[Bob Phillips]

Doug,

Never forget maintainability.Making the code easy to read and easy to maintain is very important, as in most typical applications, far more time is spent on maintenance than on development.

[YellowLabPro]

Point is well taken.
But my code always looks like a little kid's term paper;

See Spot sit.
See Spot sleep.
See Spot eat.
Spot is a very boring dog, and sooner or later, Spot wants to run.

[Norie]

Doug

And what's wrong with that?

Surely it's better to have code that's easy to follow and read rather than something that when looked at the first thought is WTF?

And you could find yourself having that thought if you return to code after a period.

[Bob Phillips]

But Spot helped my girls learn to read. Einstein's paper on relativity was a tad difficult!

[YellowLabPro]

All I can do is smile