ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   paste (https://www.excelbanter.com/excel-programming/337906-paste.html)

jobra

paste
 
I wish to copy a line and paste it into anotherline

Sub macro1()
Range("A2:L2").Select
ActiveSheet.Copy
Range("A23:L23").Select
ActiveSheet.Paste
end sub
This doesn't work
Can anyone help me on this
Thanks

Aram Sargsyan

paste
 

Range("A1:L1").Select
Selection.Copy
Range("A3:L3").Select
ActiveSheet.Paste

works perfectly if you are copying range

for copiing whole line use

Rows("1:1").Select
Application.CutCopyMode = False
Selection.Copy
Rows("3:3").Select
ActiveSheet.Paste

*** Sent via Developersdex http://www.developersdex.com ***

Paul Sheppard[_6_]

paste
 

jobra Wrote:
I wish to copy a line and paste it into anotherline

Sub macro1()
Range("A2:L2").Select
ActiveSheet.Copy
Range("A23:L23").Select
ActiveSheet.Paste
end sub
This doesn't work
Can anyone help me on this
Thanks


Hi jobra

Try this

Range("A2:L2").Select
Selection.Copy
Range("A23").Select
ActiveSheet.Paste
Range("A1").Select


--
Paul Sheppard


------------------------------------------------------------------------
Paul Sheppard's Profile: http://www.excelforum.com/member.php...o&userid=24783
View this thread: http://www.excelforum.com/showthread...hreadid=397699


Bob Phillips[_6_]

paste
 

"Aram Sargsyan" wrote in message
...

Range("A1:L1").Select
Selection.Copy
Range("A3:L3").Select
ActiveSheet.Paste


No selecting

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

for copiing whole line use

Rows("1:1").Select
Application.CutCopyMode = False
Selection.Copy
Rows("3:3").Select
ActiveSheet.Paste



Ditto

range("1:1").Copy Range("A3")



jobra

paste
 
Thank you very much. This was exactly wath I wanted to know.

"Aram Sargsyan" wrote:


Range("A1:L1").Select
Selection.Copy
Range("A3:L3").Select
ActiveSheet.Paste

works perfectly if you are copying range

for copiing whole line use

Rows("1:1").Select
Application.CutCopyMode = False
Selection.Copy
Rows("3:3").Select
ActiveSheet.Paste

*** Sent via Developersdex http://www.developersdex.com ***



All times are GMT +1. The time now is 08:13 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com