Would like a more efficient way to Copy/PasteSpecial
On Mar 12, 9:11*am, StevenM wrote:
I was doing this:
* * Range("H1:H5").Select
* * Selection.Copy
* * Range("B1:B5").Select
* * ActiveSheet.Paste
* * Application.CutCopyMode = False
and then came across this technique which apparently
is more efficient:
* * Range("H1:H5").Copy Range("B1:B5")
Can you do the same thing when trying to PasteSpecial Values?
Is there a more efficient way to do this:
* * Range("H1:H5").Select
* * Selection.Copy
* * Range("B1:B5").Select
* * Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
* * * * SkipBlanks:=False, Transpose:=False
* * Application.CutCopyMode = False
Can you do something like?
* * Range("H1:H5").PasteSpecialPaste:=xlPasteFormats, Operation:=xlNone, _
* * * * SkipBlanks:=False, Transpose:=False * Range("B1:B5")
Not tested, but I think it should be two lines like this
Range("H1:H5").copy
Range("B1:B5").PasteSpecial
|