Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy/Paste Row
Dear All I am new to VBA, I would be very grateful if you can provide a scrip for me :) This is my case, I have two worksheets. Worksheet A has a button an Worksheet B has 5 rows record. What I want is, if I press the button on Worksheet A it will copy th LAST row on Worksheet B and paste it 10 to 20 down =================================== WORKSHEET BUTTON <-------- When button pressed WORKSHEET 12 34 45 12 45 18 74 55 32 46 14 67 85 52 75 13 34 44 34 45 34 86 67 52 35 <------copy this row row 1 ......................... row 2 ......................... row 3 ......................... row 4 ......................... row 5 ......................... row 6 ......................... row 7 ......................... row 8 ......................... row 9 ......................... row 10 ......................... 34 86 67 52 35 <------ paste it after row 10 =================================== Can anyone give me a VBA script using "CommandButton1_Click()" o Worksheet A to satisfy the copy/paste purpose on Worksheet B. Than you very much!! Thanks in advance Violaplaye -- Violaplaye ----------------------------------------------------------------------- Violaplayer's Profile: http://www.excelforum.com/member.php...fo&userid=1621 View this thread: http://www.excelforum.com/showthread.php?threadid=27783 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy/Paste Row
The following should do it (copy as all one line in your module and change
the sheet name appropriately): Sheets("Sheet_B_Name").Range("A65536").End(xlUp).C opy Destination:=Sheets("Sheet_B_Name").Range("A65536" ).End(xlUp).Offset(10, 0) NOTE: This will only work if nothing else resides below your data in the sheet. "Violaplayer" wrote: Dear All I am new to VBA, I would be very grateful if you can provide a script for me :) This is my case, I have two worksheets. Worksheet A has a button and Worksheet B has 5 rows record. What I want is, if I press the button on Worksheet A it will copy the LAST row on Worksheet B and paste it 10 to 20 down =================================== WORKSHEET A BUTTON <-------- When button pressed WORKSHEET B 12 34 45 12 45 18 74 55 32 46 14 67 85 52 75 13 34 44 34 45 34 86 67 52 35 <------copy this row row 1 ......................... row 2 ......................... row 3 ......................... row 4 ......................... row 5 ......................... row 6 ......................... row 7 ......................... row 8 ......................... row 9 ......................... row 10 ......................... 34 86 67 52 35 <------ paste it after row 10 =================================== Can anyone give me a VBA script using "CommandButton1_Click()" on Worksheet A to satisfy the copy/paste purpose on Worksheet B. Thank you very much!! Thanks in advance Violaplayer -- Violaplayer ------------------------------------------------------------------------ Violaplayer's Profile: http://www.excelforum.com/member.php...o&userid=16211 View this thread: http://www.excelforum.com/showthread...hreadid=277836 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy/Paste Row
Sorry, the other version only copies the cell, the one below copies the
entire row: Sheets(2).Range("A65536").End(xlUp).EntireRow.Copy Destination:=Sheets(2).Range("A65536").End(xlUp).O ffset(10, 0) Hope this helps. "Violaplayer" wrote: Dear All I am new to VBA, I would be very grateful if you can provide a script for me :) This is my case, I have two worksheets. Worksheet A has a button and Worksheet B has 5 rows record. What I want is, if I press the button on Worksheet A it will copy the LAST row on Worksheet B and paste it 10 to 20 down =================================== WORKSHEET A BUTTON <-------- When button pressed WORKSHEET B 12 34 45 12 45 18 74 55 32 46 14 67 85 52 75 13 34 44 34 45 34 86 67 52 35 <------copy this row row 1 ......................... row 2 ......................... row 3 ......................... row 4 ......................... row 5 ......................... row 6 ......................... row 7 ......................... row 8 ......................... row 9 ......................... row 10 ......................... 34 86 67 52 35 <------ paste it after row 10 =================================== Can anyone give me a VBA script using "CommandButton1_Click()" on Worksheet A to satisfy the copy/paste purpose on Worksheet B. Thank you very much!! Thanks in advance Violaplayer -- Violaplayer ------------------------------------------------------------------------ Violaplayer's Profile: http://www.excelforum.com/member.php...o&userid=16211 View this thread: http://www.excelforum.com/showthread...hreadid=277836 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can't Copy and Paste or Paste Special between Excel Workbooks | Excel Discussion (Misc queries) | |||
Copy; Paste; Paste Special are disabled | Excel Discussion (Misc queries) | |||
Excel cut/Paste Problem: Year changes after data is copy and paste | Excel Discussion (Misc queries) | |||
I cannot paste from one workbook to another. Copy works, paste do. | Excel Discussion (Misc queries) | |||
Macro to Copy/Paste then Paste to Next Line | Excel Programming |