Syntax For Compressing script

Asked Mar 21 '22 at 21:30

Active Mar 21 '22 at 21:31

Viewed 27 times

I would like to compress these 3 Lines into 1

    Sheets("Sheet2").Select
    
    Cells(27, 1).Select
    
    ActiveSheet.Paste

My attempt was

Sheets("Sheet2").Cells(27,1).Paste

But i was getting a error 438

"object does not match the method or property."

Any idea how i could compile this in 1 line?

edited Mar 21 '22 at 21:31

braX

asked Mar 21 '22 at 21:30

Jacob Lupton

1

`Sheets("Sheet2").Cells(27,1).PasteSpecial XlAll` – Scott Craner Mar 21 '22 at 21:32
https://stackoverflow.com/questions/10714251/how-to-avoid-using-select-in-excel-vba – cybernetic.nomad Mar 21 '22 at 21:33
... i.e. `Paste` works with worksheets while `PasteSpecial` works with ranges. A more efficient option is to use the `Copy` method `SourceRange.Copy Worksheets("Sheet2").Cells(27,1)` which is short for `SourceRange.Copy Destination:=Worksheets("Sheet2").Cells(27,1)`. – VBasic2008 Mar 21 '22 at 21:56
1

`Sheets("Sheet2").Paste Destination:=Sheets("Sheet2").Cells(27, 1)` – Tim Williams Mar 21 '22 at 23:31
@Tim Williams: That's a 'new' one. I can't recall ever seeing it. – VBasic2008 Mar 21 '22 at 23:37
@VBasic2008 Can't say I use it much either - the `someRange.Copy Destination:=someOtherRange` is the go-to version. – Tim Williams Mar 21 '22 at 23:39

0 Answers0