Copy Paste Values

  • Thread starter Thread starter Arthur
  • Start date Start date
A

Arthur

I like this code for a normal copy/paste because nothing
gets selected:

Range("A1:A3").Copy Range("C1")


If I need to paste values, this code works, but the copied
range gets selected (I guess) because it is left with a
blinking outline in the worksheet:

Range("A1:A3").Copy
Range("C1").PasteSpecial Paste:=xlPasteValues


(1) Is there a way to copy and paste values without
selecting the copied range?

(2) Alternatively, how do I "clear" the blinking outline
after the procedure runs?

Art
 
-----Original Message-----
I like this code for a normal copy/paste because nothing
gets selected:

Range("A1:A3").Copy Range("C1")


If I need to paste values, this code works, but the copied
range gets selected (I guess) because it is left with a
blinking outline in the worksheet:

Range("A1:A3").Copy
Range("C1").PasteSpecial Paste:=xlPasteValues


(1) Is there a way to copy and paste values without
selecting the copied range?

(2) Alternatively, how do I "clear" the blinking outline
after the procedure runs?

Art

.
Click to expand...

Hi Art,

I'm use this method to copy.

Worksheets("Sheet1").Range("A1:D4").Copy _
destination:=Worksheets("Sheet2").Range("E5")

to clear the "blinking cell(s)" use

Application.CutCopyMode = False

Hope that helps..
 
To copy only values without using the clipboard.

Range("C1").Resize(3,1).Value = Range("A1:A3").Value
or
Range("C1:C3").Value = Range("A1:A3").Value
 
Back
Top