How to copy data from sheet1 to sheet2Solved/Closed

Question

Hello,
I have a worksheet, there are 2 sheets. What I need is to do is copy all the column and rows from sheet1 and paste it to sheet2. The copy button 'Macro' should not be fixed to copy only constant, it should be dynamic means if I add some more rows in sheet1 and click copy button then  it should paste all the rows and column in sheet2. 

Please help me to understand looping concept in VBA, I also bought Bill Jelen book VBA and Macros for MS office Excel 2007. I am try to understand as I am new to VBA


Deepak~

venkat1926 · Accepted Answer

why not use a simple macro(no need for looping etc )

Sub test()
Worksheets("sheet1").Cells.Copy
Worksheets("sheet2").Range("a1").PasteSpecial
End Sub

first check whether this macro works. 

insert a button in sheet 1 from from toollbar and assign this macro to the button.

venkat1926 · Answer

you want ot copy complete sheet1 to sheet2. It depends upon whether sheet 2 is blank or does it contain alrready some data. sp,e tomes macro may not be necessary. 
plese claiify.

Deepak · Answer

The sheet 2 is blank, I want a VBA code of abutton named 'Copy' on sheet1 once I click this it will copy alll the data from sheet1 and paste to sheet2 which is blank.

Deepak · Answer

Its a easiest way to do this, but I think this is not a good idea because its copying all whole sheet1. Lets think in this way I have only 2 columns. I want to copy only these columns and rows which have data. So the loop should search column and row wise if its reach to empty cell (last row with no data) it exit by copying all data and paste to sheet2.



Deepak~

venkat1926 · Answer

does it loop? I do not know. I thought it highlight the whole sheet and just coy ,does it take long time have you checked. 
if you are intuitively unhappy about he macro try this macro 

worksheets("sheet1").usedrange.copy
worksheets("sheet2").range("a1").pastespecial

Deepak · Answer

Yes it is copying whole sheet, let me try by loop myself, if I succced I will let you know or wait for others if they are alive they will respond. 



Deepak~

venkat1926 · Answer

see the definition of usedrange in excel help usedrange means only the data that are entered  why should you loop.

Deepak · Answer

Thanks all and Venkat, this really worked, actually I am new so not aware about inbuit function. 


Cheers~

How to copy data from sheet1 to sheet2

8 replies

Subscribe To Our Newsletter!