how to copy and paste a DATA from one sheet to another

[charith]

hello...

i want to copy column A,D,E,F from sheet 1 to sheet 2 column B,C,D,F...

I have a sheet titled "Main" that contains the raw data like the example below. I have another sheets titled "Orders" and . I'm needing a code to copy the data only from column A,D,E,F in "Main" sheet, and paste it in the "Sheet 2" column B,C,D,F based on "sell & buy" values

Sheet(main)

A	B	C	D	E	F
ORDER TYPE			#ORDERS	PRICE	%
BUY			1	45.78	0.1
SELL			23	2354.67	0.15
-			-	-	-
BUY			345	6789	0.23

<tbody>
</tbody>

Sheet(Orders)

A	B	C	D	F	G
A1	BUY	1	45.78	0.1
B2	SELL	23	2354.67	0.15
C1	BUY	345	6789	0.23
D1

<tbody>
</tbody>

​Any help is MUCH appreciated THANK YOU!!

 

[L. Howard]

See if this does what you want.

I actually did not change any code except where it said Sheet2 I inserted Orders.

Click the button and check out sheet Orders.

Howard


https://www.dropbox.com/s/g10gz83d2wow5wb/Book1 Main Order Drop Box.xlsm

 

[charith]

Thank you very much Sir it work...!! Thanks a lot.!

 

[L. Howard]

You're welcome. Thanks for the feed back.

Regards,
Howard

 

[charith]

if i want to copy column 84 and 85 in " Main " sheet, to Order sheet( TO column G and H ) what are the changes in code..!!

 

[badrat]

Hy,

I really need your advice, or better to say, help.
I need to copy data from one sheet to another, but the trick is that the arrangement of cells is diffrent in each sheet.
To be more precise, I need the value in cell A4 in sheet 2 to be in cell A1 in sheet 1, cell A15 in sheet 2 to be in cell A2 in sheet 1, cell A26 in sheet 2 to be in cell A3 in sheet 1 and so on. So basicly, the diffrence is always 11. Siince, there is a ton of data, I need formula for this.

Thanks a lot.

 

[L. Howard]

Add this line of code just above the End If statement.

     c.Offset(, 83).Resize(1, 2).Copy
        Sheets("Orders").Range("G" & Rows.Count).End(xlUp)(2).PasteSpecial Paste:=xlPasteValues

Howard

 

[L. Howard]

Hi badrat,welcome to the forum.

What you have done here with your post is called Highjacking another post. You should read the do's and don't for posting in the forum.

What you want is doable.

Please do this.

Submit a new post with the title something like:

How to copy every eleventh cell on one sheet to a list on another.

I will be looking for it as well as many superb code experts.

I think you will be surprised with the results you get.

Regards,
Howard

 

[L. Howard]

In the private mail to me:

sir can you plese help me to solve this , actually this code works fine but the problem is , when the column 3 fills automatically with "S" it do not work..!! sorry for the disturb..

This is not clear to me.

What column 3 and where do the S's come from?

No need for private mail, others viewers here may have a solution also, or understand better what the problem is.

I would suggest a link to an example workbook and explain the problem in that post or on the sheet in the workbook you are having the problem.

I use and like Drop Box, but there are others.

Howard

 

[charith]

https://www.dropbox.com/s/uusm1kfxwfebqry/LIVE%20STOCK%20QUOTES%20%28API%29%20V5.1.xlsx

This is it..!! it is about share market

when the stoket market open DayHigh and DayLow prices are fill automatically.
once market price came to that columns, the "Open column(Column number 103)" fills with "Y" (as now the market is closed we can drag the cell CY6 ("Y") down and see the changes )


So i want to copy "current price "(48) to " open price "(45) column when "open column (103)" = Y

(it works when i entered letter "Y" to column "open" (103), but it didn't work when it fills automatically)



Thank you very much

 

[charith]

bump